Index: openacs-4/packages/categories/tcl/categories-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/categories-procs.xql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/categories/tcl/categories-procs.xql	27 Jan 2005 21:37:42 -0000	1.5
+++ openacs-4/packages/categories/tcl/categories-procs.xql	7 Feb 2005 10:39:06 -0000	1.6
@@ -1,6 +1,17 @@
 <?xml version="1.0"?>
 <queryset>
 
+<fullquery name="category::get_id.get_category_id">      
+      <querytext>
+      
+		select category_id
+		from category_translations
+		where name = :name
+		and locale = :locale
+	    
+      </querytext>
+</fullquery>
+
 <fullquery name="category::update.check_category_existence">      
       <querytext>