fancy/inscrutable
Posted to
tcl
by Stu at Wed Aug 20 10:50:24 GMT 2008
view raw
set
i -1;
foreach
d
$data
{
incr
i
set
idx2node(
$i
) [
$table
insert {} end \
-values [
list
\
[
lindex
$d
end] \
[
lindex
$d
0] \
[
lindex
$d
3] \
$i
\
]
]
}
Recent Posts
tcl by mookie
7 days ago
tcl by apn
7 days ago
tcl by schelte
10 days ago
tcl by dandyn
12 days ago
tcl by apn
13 days ago
tcl by pascal
13 days ago
tcl by mookie
17 days ago
tcl by dandyn
22 days ago
tcl by kevin_walzer
22 days ago
tcl by mookie
25 days ago
Submit
New paste
Documentation
From Jabber