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.1 -r1.1.4.1 --- openacs-4/packages/faq/tcl/faq-procs.tcl 19 May 2004 20:09:43 -0000 1.1 +++ openacs-4/packages/faq/tcl/faq-procs.tcl 21 Mar 2007 05:58:18 -0000 1.1.4.1 @@ -7,7 +7,22 @@ @Modifyed by Gerardo Morales } +namespace eval faq { + ad_proc -public get_instance_info { + -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 + } { + upvar $arrayname faq_info + db_0or1row get_info "" -column_array faq_info + } + +} + namespace eval faq::notification { ad_proc -public get_url {