Index: openacs-4/contrib/packages/mailing-lists/www/index-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/mailing-lists/www/index-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/mailing-lists/www/index-postgresql.xql	1 Oct 2003 05:01:54 -0000	1.1
+++ openacs-4/contrib/packages/mailing-lists/www/index-postgresql.xql	21 Jan 2004 19:22:15 -0000	1.2
@@ -29,16 +29,32 @@
 	  inner join category_object_map cm
 		on (cm.object_id = l.list_id)
           inner join categories c using (category_id)
-	  inner join ml_category_trees_visible v using (tree_id)
      where l.package_id = :package_id
      and l.public_p = 't'
      and l.locale = :locale
      and l.expiration_date > current_timestamp
-     and v.package_id = :package_id
      order by c.tree_id, c.category_id, lower(l.name)
 
       </querytext>
 </fullquery>
 
  
+<fullquery name="get_lists_by_language_new">
+      <querytext>
+
+     select l.list_id, l.name, l.teaser,
+            coalesce(m.subscribed_p, 'f') as subscribed_p
+     from ml_mailing_lists l
+	  left outer join ml_mailing_list_user_map m
+	       on (l.list_id = m.list_id and m.user_id = :user_id)
+     where l.package_id = :package_id
+     and l.public_p = 't'
+     and l.locale = :locale
+     and l.expiration_date > current_timestamp
+     order by lower(l.name)
+
+      </querytext>
+</fullquery>
+
+ 
 </queryset>