Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -r1.191.2.3 -r1.191.2.4
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	30 Sep 2013 11:37:17 -0000	1.191.2.3
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	5 Oct 2013 11:25:10 -0000	1.191.2.4
@@ -788,8 +788,10 @@
       #ns_log notice "--c category_ids=$category_ids"
       if {$category_ids ne ""} {
         foreach cid [split $category_ids ,] {
+          set or_ids [split $cid |]
+	  foreach or_id in $or_ids { if {![string is integer $or_id]} {error "invalid category_ids"}}
           append sql " and exists (select * from category_object_map \
-	     where object_id = ci.item_id and category_id = $cid)"
+	     where object_id = ci.item_id and category_id in ([join $or_ids ,]))"
         }
       }
       append sql $locale_clause