Index: openacs-4/packages/acs-tcl/tcl/defs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/defs-procs.tcl,v
diff -u -r1.71 -r1.72
--- openacs-4/packages/acs-tcl/tcl/defs-procs.tcl	3 Mar 2018 16:51:35 -0000	1.71
+++ openacs-4/packages/acs-tcl/tcl/defs-procs.tcl	25 Apr 2018 19:23:26 -0000	1.72
@@ -358,7 +358,7 @@
     @author Unknown
     @author Roberto Mello
 } {
-    set lines [list]
+    set lines {}
     if { $line2 eq "" } {
 	lappend lines $line1
     } elseif { $line1 eq "" } {