OpenACS

donb
committed
MAIN:donb:20061027203449
on 27 Oct 06
Fire callback failed because of a callback implementation defined in the
test callback create callback test. Each case would pass separatel… Show more
Fire callback failed because of a callback implementation defined in the

test callback create callback test.  Each case would pass separately, but if

the create test was followed by the fire test, the fire test would faile.

Show less

openacs-4/.../www/admin/forum-edit.tcl (+10 -8)
44 44         forum::new_questions_allow -forum_id $forum_id
45 45     } else {
46 46         forum::new_questions_deny -forum_id $forum_id
47 47     }   
48 48
49 49     ad_returnredirect "../forum-view?forum_id=$forum_id"
50 50     ad_script_abort
51 51 }
52 52
53 53 # Select the info
54 54 set package_id [ad_conn package_id]
55 55 forum::get -forum_id $forum_id -array forum
56 56
57 57 # Proper scoping?
58 58 if {$package_id != $forum(package_id)} {
59 59     ns_log Error "Forum Administration: Bad Scoping of Forum #$forum_id in Forum Editing"
60 60     ad_returnredirect "./"
61 61     ad_script_abort
62 62 }
63 63    
  64 if { [form is_request forum] } {
64 65     element set_properties forum forum_id -value $forum_id
65 66     element set_properties forum name -value $forum(name)
66 67     element set_properties forum charter -value $forum(charter)
67 68     element set_properties forum presentation_type -value $forum(presentation_type)
68 69     element set_properties forum posting_policy -value $forum(posting_policy)
69 70     element set_properties forum new_threads_p -value [forum::new_questions_allowed_p -forum_id $forum_id]
  71 }
70 72
71 73 ad_return_template