Index: openacs-4/packages/faq/tcl/faq-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/tcl/faq-procs.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/faq/tcl/faq-procs.tcl	7 Aug 2017 23:48:10 -0000	1.4
+++ openacs-4/packages/faq/tcl/faq-procs.tcl	12 Jul 2018 12:39:45 -0000	1.5
@@ -10,15 +10,15 @@
 namespace eval faq {
 
     ad_proc -public get_instance_info {
-	-arrayname:required  
-	-faq_id:required 
+        -arrayname:required
+        -faq_id:required
     } {
-	returns the name of the FAQ and whether to display 
-	questions and their answers all on the listing page 
-	or on separate pages 
+        returns the name of the FAQ and whether to display
+        questions and their answers all on the listing page
+        or on separate pages
     } {
-	upvar $arrayname faq_info
-	db_0or1row get_info "" -column_array faq_info
+        upvar $arrayname faq_info
+        db_0or1row get_info "" -column_array faq_info
     }
 
 }
@@ -30,12 +30,12 @@
     } {
         returns a full url to the object_id.
         handles messages and forums.
-    } { 
+    } {
 
-	    set q_and_a_id $object_id
-            db_1row get_faq_id "*SQL*"
-	    set faq_url  "[ad_url][ad_conn package_url]"
-	    return ${faq_url}one-faq?faq_id=$faq_id
+        set q_and_a_id $object_id
+        db_1row get_faq_id "*SQL*"
+        set faq_url  "[ad_url][ad_conn package_url]"
+        return ${faq_url}one-faq?faq_id=$faq_id
 
     }
 }