Index: openacs-4/packages/general-comments/www/index.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/index.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/general-comments/www/index.xql	22 Nov 2017 14:13:32 -0000	1.2
+++ openacs-4/packages/general-comments/www/index.xql	13 Jun 2018 13:40:24 -0000	1.3
@@ -40,5 +40,27 @@
       
     </querytext>
   </partialquery>
+
+  <fullquery name="comments_select">
+    <querytext>
+     select g.comment_id,
+            r.title, 
+            i.live_revision is not null as live_version_p,
+            i.live_revision is not null and
+               i.live_revision = r.revision_id as approved_p,
+            o.creation_date
+      from general_comments g,
+           cr_items i,
+           cr_revisions r,
+           acs_objects o
+     where g.comment_id = i.item_id and
+           r.revision_id = o.object_id and
+           r.revision_id = i.latest_revision and 
+           o.creation_user = :user_id
+          [ad_dimensional_sql $dimensional]
+     [template::list::orderby_clause -orderby -name comments_list]
+    </querytext>
+  </fullquery>
   
+  
 </queryset>