aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/CSV-to-HTML-translation/Tcl/csv-to-html-translation-1.tcl
View file

@ -18,7 +18,7 @@ html::init
puts [subst {
[html::openTag table {summary="csv2html program output"}]
[html::while {[rows size]} {
[html::row {*}[html::quoteFormValue [rows get]]]
[html::row {*}[html::quoteFormValue [rows get]]]
}]
[html::closeTag]
}]

8
Task/CSV-to-HTML-translation/Tcl/csv-to-html-translation-2.tcl
View file

@ -37,9 +37,9 @@ foreach line [split $csvData "\n"] {
# Generate the output
puts [subst {
[table {
[tr [html::quoteFormValue [rows get]] {bgcolor="yellow"}]
[html::while {[rows size]} {
[tr [html::quoteFormValue [rows get]]]
}]
[tr [html::quoteFormValue [rows get]] {bgcolor="yellow"}]
[html::while {[rows size]} {
[tr [html::quoteFormValue [rows get]]]
}]
}]
}]