Index: openacs-4/packages/acs-templating/tcl/list-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/list-procs.tcl,v
diff -u -r1.18.2.8 -r1.18.2.9
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	9 Dec 2004 03:48:58 -0000	1.18.2.8
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	19 Dec 2004 00:10:04 -0000	1.18.2.9
@@ -730,6 +730,9 @@
     if { $tcl_list_p } {
         return $ids
     } else {
+        if { [llength $ids] == 0 } {
+            return NULL
+        }
 	set quoted_ids [list]
 	foreach one_id $ids {
 	    lappend quoted_ids "'[DoubleApos $one_id]'"