Index: openacs-4/packages/lorsm/www/delivery/menu.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/menu.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/lorsm/www/delivery/menu.tcl 12 Dec 2008 14:25:40 -0000 1.11 +++ openacs-4/packages/lorsm/www/delivery/menu.tcl 14 Feb 2009 22:33:20 -0000 1.12 @@ -41,7 +41,7 @@ template::util::list_of_lists_to_array $items_list items_array set fs_package_id [db_string get_fs_package_id {} -default "" ] -set community_id [dotlrn_community::get_community_id] +set community_id [lors::get_community_id] set counter 1 set user_id [ad_conn user_id] @@ -180,5 +180,4 @@ set TREE_HASH [join $TREE_HASH "\n"] } # return_url -set return_url [dotlrn_community::get_community_url \ - [dotlrn_community::get_community_id]] +set return_url [lors::get_community_url]