Index: openacs-4/packages/cms/tcl/pagination-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/Attic/pagination-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/cms/tcl/pagination-procs.tcl	10 Aug 2001 15:03:28 -0000	1.3
+++ openacs-4/packages/cms/tcl/pagination-procs.tcl	11 Aug 2001 17:40:26 -0000	1.4
@@ -19,18 +19,8 @@
 
     set rows_per_page [pagination::get_rows_per_page]
     set start_row [expr $rows_per_page*[expr $page-1]+1]
-    #FIX ME
-    set query [db_map pq_paginate_query] "
-      select *
-      from
-        (
-          select 
-            x.*, rownum as row_id
-	  from
-	    ($sql) x
-        ) ordered_sql_query_with_row_id
-      where
-        row_id between $start_row and $start_row + $rows_per_page - 1"
+
+    set query [db_map pq_paginate_query]
     
     return $query
 }