Index: openacs-4/packages/simulation/www/citybuild/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/citybuild/index.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/simulation/www/citybuild/index.tcl 5 Jan 2004 10:31:41 -0000 1.5 +++ openacs-4/packages/simulation/www/citybuild/index.tcl 30 Jan 2004 09:34:05 -0000 1.6 @@ -17,8 +17,9 @@ set admin_p [permission::permission_p -object_id $package_id -privilege admin] set map_p [permission::permission_p -object_id $package_id -privilege sim_set_map_p] -set notification_widget [notification::display::request_widget \ - -type [simulation::notification::xml_map::type_short_name] \ - -object_id [ad_conn package_id] \ - -pretty_name [simulation::notification::xml_map::type_pretty_name] \ - -url "[ad_conn url]?[ad_conn query]"] + +foreach { subscribe_url unsubscribe_url } \ + [notification::display::get_urls \ + -type [simulation::notification::xml_map::type_short_name] \ + -object_id [ad_conn package_id] \ + -pretty_name [simulation::notification::xml_map::type_pretty_name]] {}