Index: openacs-4/packages/categories/tcl/categories-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/categories-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/categories/tcl/categories-procs.tcl	7 Feb 2005 10:39:06 -0000	1.19
+++ openacs-4/packages/categories/tcl/categories-procs.tcl	8 Feb 2005 11:22:56 -0000	1.20
@@ -226,7 +226,7 @@
     @return the category id or empty string it no category was found
     @author Lee Denison (lee@xarg.co.uk)
 } {
-    return [db_string get_category_id {} -default ""]
+    return [db_list get_category_id {}]
 }
 
 ad_proc -public category::reset_translation_cache { } {