Forum OpenACS Q&A: Response to New Survey Package imported into CVS

Collapse
Posted by Stan Kaufman on
Dave, I don't know if you want stuff posted here or in the SDM, but trying to add a question to a survey produces this error. It appears there's some dotlrn stuff still in the code that needs to be cleaned out, eh?

Request Error

       invalid command name "dotlrn_community::get_community_id_from_url"
           while executing
       "dotlrn_community::get_community_id_from_url"
           invoked from within
       "set community_id [dotlrn_community::get_community_id_from_url]"
           ("uplevel" body line 27)
           invoked from within
       "uplevel {
                 ad_page_contract {

           This page allows the admin to administer a single survey.

           @param  section_id integer denoting survey we'..."
           (procedure "code::tcl::/var/web/epimetrics-dev/packages/survey/www/admin..." line 2)
           invoked from within
       "code::tcl::$__adp_stub"
           invoked from within
       "if { [file exists $__adp_stub.tcl] } {

             # ensure that data source preparation procedure exists and is up-to-date
             adp_init tcl $__adp_stub
       ..."
           ("uplevel" body line 3)
           invoked from within
       "uplevel {

           if { [file exists $__adp_stub.tcl] } {

             # ensure that data source preparation procedure exists and is up-to-date
             adp_init t..."
           (procedure "adp_prepare" line 2)
           invoked from within
       "adp_prepare "
           (procedure "template::adp_parse" line 30)
           invoked from within
       "template::adp_parse [file root [ad_conn file]] {}"
           (procedure "adp_parse_ad_conn_file" line 7)
           invoked from within
       "$handler"
           ("uplevel" body line 2)
           invoked from within
       "uplevel $code"
           invoked from within
       "ad_try {
               $handler
             } ad_script_abort val {
               # do nothing
             }"
           invoked from within
       "rp_serve_concrete_file [ad_conn file]"
           (procedure "rp_serve_abstract_file" line 60)
           invoked from within
       "rp_serve_abstract_file "$root/$path""
           ("uplevel" body line 2)
           invoked from within
       "uplevel $code"
           invoked from within
       "ad_try {
               rp_serve_abstract_file "$root/$path"
               set tcl_url2file([ad_conn url]) [ad_conn file]
               set tcl_url2path_info([ad_conn url]) [ad_conn path_inf..."