Index: openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl,v
diff -u -r1.66 -r1.67
--- openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl	6 Apr 2007 17:36:01 -0000	1.66
+++ openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl	14 May 2007 20:30:26 -0000	1.67
@@ -2027,8 +2027,8 @@
         }
     } elseif { ![info exists column_set] } {
         for { set i 0 } { $i < [ns_set size $selection] } { incr i } {
-            upvar 1 [ns_set key $selection $i] value
-            set value [ns_set value $selection $i]
+            upvar 1 [ns_set key $selection $i] return_value
+            set return_value [ns_set value $selection $i]
         }
     }