Index: library/lib/make.tcl
===================================================================
diff -u -rf858f142f5fab4f88996b3eb709c3afa55114be9 -r073177c8b1304443107efeeb0c334e9477346778
--- library/lib/make.tcl	(.../make.tcl)	(revision f858f142f5fab4f88996b3eb709c3afa55114be9)
+++ library/lib/make.tcl	(.../make.tcl)	(revision 073177c8b1304443107efeeb0c334e9477346778)
@@ -18,7 +18,7 @@
     set fls {}
     foreach f [glob -nocomplain *tcl] {
       if {![file isdirectory $f]} {
-        set F [open $f]; set c [read $F]; close $F
+        set F [file open $f]; set c [read $F]; close $F
         if {[string match "*package provide*" $c]} { lappend fls $f }
       }
     }
@@ -75,6 +75,7 @@
         close $IN; close $OUT
       }
     }
+
     #puts stderr "+++ mkIndex name=$name, pwd=[pwd] DONE"
   }
 
@@ -198,4 +199,4 @@
 
 #puts stderr "+++ make.tcl finished."
 
-#exit $::result
\ No newline at end of file
+#exit $::result