Table creation: Difference between revisions
Content added Content deleted
m (→{{header|Tcl}}) |
(→{{header|Tcl}}: made a little prettier) |
||
Line 86: | Line 86: | ||
} |
} |
||
append res \n |
append res \n |
||
if {$row eq [lindex $table 0]} { |
|||
append res $head \n |
|||
} |
|||
} |
} |
||
append res $head |
append res $head |
||
Line 114: | Line 117: | ||
+------------+------------+--------+-------------+---------+ |
+------------+------------+--------+-------------+---------+ |
||
| account_id | created | active | username | balance | |
| account_id | created | active | username | balance | |
||
+------------+------------+--------+-------------+---------+ |
|||
| 12345 | 2009-05-13 | | John Doe | 0.0 | |
| 12345 | 2009-05-13 | | John Doe | 0.0 | |
||
| 12346 | 2009-05-14 | | Jane Miller | 0.0 | |
| 12346 | 2009-05-14 | | Jane Miller | 0.0 | |