Index: openacs-4/packages/lors-central/tcl/lors-central-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/tcl/lors-central-procs.tcl,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/lors-central/tcl/lors-central-procs.tcl	5 Apr 2018 14:44:09 -0000	1.6
+++ openacs-4/packages/lors-central/tcl/lors-central-procs.tcl	25 Apr 2018 19:47:47 -0000	1.7
@@ -429,7 +429,7 @@
     returns    position in list + 1
 } {
     set item_id [lors_central::get_item_id -revision_id $revision_id]
-    set versions [list]
+    set versions {}
     set versions [db_list_of_lists get_all_versions { }]
     return [expr [lsearch -exact $versions $revision_id] + 1]
 }
@@ -444,7 +444,7 @@
     @ver_nun@   Version Number
     returns     revision_id
 } {
-    set versions [list]
+    set versions {}
     set versions [db_list_of_lists get_all_versions { }]
     return [lindex $versions [expr $ver_num - 1]]
 }