Index: openacs-4/packages/faq/www/admin/faq-disable.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/www/admin/faq-disable.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/faq/www/admin/faq-disable.tcl	15 May 2007 20:14:35 -0000	1.4
+++ openacs-4/packages/faq/www/admin/faq-disable.tcl	9 Nov 2008 23:29:25 -0000	1.5
@@ -6,11 +6,16 @@
 
 } {
     faq_id:naturalnum,notnull
+    referer:optional
 }
 set package_id [ad_conn package_id]
 
 permission::require_permission -object_id  $package_id -privilege faq_delete_faq
 
 db_dml disable_faq {}
 
-ad_returnredirect "."
+if { ![info exists referer] } {
+    set referer "index"
+}
+
+ad_returnredirect $referer