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.72 -r1.73
--- openacs-4/packages/acs-tcl/tcl/defs-procs.tcl	25 Apr 2018 19:23:26 -0000	1.72
+++ openacs-4/packages/acs-tcl/tcl/defs-procs.tcl	9 May 2018 15:33:29 -0000	1.73
@@ -358,7 +358,7 @@
     @author Unknown
     @author Roberto Mello
 } {
-    set lines {}
+    set lines [list]
     if { $line2 eq "" } {
 	lappend lines $line1
     } elseif { $line1 eq "" } {