Index: openacs-4/packages/faq/tcl/faq-sc-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq/tcl/faq-sc-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/faq/tcl/faq-sc-procs.tcl 11 Jun 2018 09:41:40 -0000 1.5 +++ openacs-4/packages/faq/tcl/faq-sc-procs.tcl 12 Jul 2018 12:39:45 -0000 1.6 @@ -9,7 +9,7 @@ namespace eval faq::fts {} ad_proc -private faq::fts::datasource { faq_id } { - returns a datasource for a faq event to + returns a datasource for a faq event to be indexed by the full text search engine. @param faq_id @@ -46,7 +46,7 @@ ad_proc -private faq_qanda::fts::datasource { entry_id } { - returns a datasource for a faq q/a to + returns a datasource for a faq q/a to be indexed by the full text search engine. @param entry_id @@ -59,10 +59,10 @@ where faq_id = (select faq_id from faq_q_and_as where entry_id = :entry_id) } -default "FAQ $entry_id"] - if {[db_0or1row get {select question, answer from faq_q_and_as where entry_id = :entry_id}]} { + if {[db_0or1row get {select question, answer from faq_q_and_as where entry_id = :entry_id}]} { append title ": $question" set content "Q: $question\n\nA: $answer\n\n" - } else { + } else { set content {} } @@ -98,7 +98,7 @@ } ad_proc -private faq::sc::unregister_implementations {} { - db_transaction { + db_transaction { acs_sc::impl::delete -contract_name FtsContentProvider -impl_name faq acs_sc::impl::delete -contract_name FtsContentProvider -impl_name faq_q_and_a }