Index: tolbase/lib/toltk/bystable.tcl
===================================================================
--- tolbase/lib/toltk/bystable.tcl	(revision 20907d9916d11ae17a5b664a39b5a5106edf48cc)
+++ tolbase/lib/toltk/bystable.tcl	(revision 91585e2f303d78fe3aa5c166adf0669e78da543a)
@@ -342,5 +342,5 @@
     set struct "{$numCols {\n} {} { ; }} {1 { ; } {} {}}"
     set txt [ListToStrStruct $list $struct]  
-    puts $fd $txt
+    #@ puts $fd $txt
     close $fd
     return 1