Index: openacs-4/packages/acs-tcl/tcl/test/log-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/log-test-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-tcl/tcl/test/log-test-procs.tcl	10 Jan 2007 21:22:12 -0000	1.4
+++ openacs-4/packages/acs-tcl/tcl/test/log-test-procs.tcl	4 Mar 2008 13:08:38 -0000	1.5
@@ -38,5 +38,6 @@
             append entry $line \n
         }
     }
+    close $fd
 }