Index: openacs-4/packages/faq/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/www/admin/index.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/faq/www/admin/index.tcl	4 Sep 2002 13:28:33 -0000	1.3
+++ openacs-4/packages/faq/www/admin/index.tcl	17 May 2003 10:35:15 -0000	1.4
@@ -25,12 +25,15 @@
 
 
 
-db_multirow faqs faq_select {
-    select faq_id, faq_name
+db_multirow -extend { disable_url enable_url } faqs faq_select {
+    select faq_id, faq_name, disabled_p
       from acs_objects o, faqs f
       where object_id = faq_id
         and context_id = :package_id
-    order by faq_name
+    order by disabled_p, faq_name
+} {
+    set disable_url "faq-disable?[export_vars { faq_id }]"
+    set enable_url "faq-enable?[export_vars { faq_id }]"
 }
 
 ad_return_template