Index: openacs-4/packages/faq-portlet/www/faq-admin-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/www/faq-admin-portlet.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/faq-portlet/www/faq-admin-portlet.tcl	23 Oct 2002 12:30:49 -0000	1.6
+++ openacs-4/packages/faq-portlet/www/faq-admin-portlet.tcl	4 Dec 2002 09:53:40 -0000	1.7
@@ -26,6 +26,8 @@
 # Configuration
 array set config $cf	
 
+set referer [ns_conn url]
+
 # Should be a list already! 
 set list_of_package_ids $config(package_id)
 
@@ -38,7 +40,8 @@
 
 db_multirow faqs select_faqs {
     select f.faq_id, 
-           f.faq_name
+           f.faq_name,
+           f.disabled_p
     from faqs f,
          acs_objects o
     where f.faq_id = o.object_id