Index: openacs-4/packages/categories/www/categories-browse.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/categories-browse.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/categories/www/categories-browse.tcl	27 Jun 2015 19:24:24 -0000	1.12
+++ openacs-4/packages/categories/www/categories-browse.tcl	7 Aug 2017 23:48:05 -0000	1.13
@@ -160,7 +160,12 @@
     }
 
     # execute query to count objects and pages
-    paginator create get_categorized_object_count $p_name "" -pagesize 20 -groupsize 10 -contextual -timeout 0
+    # apisano: this particular statement contains $ variables, so it
+    # cannot be passed by name to the paginator, or such variables
+    # won't be resolved correctly insite the machinery.  Just compute
+    # the sql text here and pass it as is.    
+    set sql [db_map get_categorized_object_count]
+    paginator create -- $p_name $sql -pagesize 20 -groupsize 10 -contextual -timeout 0
 
     set first_row [paginator get_row $p_name $page]
     set last_row [paginator get_row_last $p_name $page]
@@ -179,3 +184,9 @@
 set page_count [paginator get_page_count $p_name]
 
 ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: