Index: openacs-4/packages/lors-central/tcl/lors-central-cr-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/tcl/lors-central-cr-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/lors-central/tcl/lors-central-cr-procs.tcl	25 Apr 2018 19:47:47 -0000	1.3
+++ openacs-4/packages/lors-central/tcl/lors-central-cr-procs.tcl	9 May 2018 15:33:32 -0000	1.4
@@ -26,7 +26,7 @@
     # Get the ip
     set creation_ip [ad_conn peeraddr]
 
-    set retlist {}
+    set retlist [list]
     foreach fle $files {
 
 	regexp {[^//\\]+$} $fle filename