Index: openacs-4/packages/lorsm/www/delivery/menu-mk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/menu-mk.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/lorsm/www/delivery/menu-mk.tcl	12 Dec 2008 14:25:40 -0000	1.7
+++ openacs-4/packages/lorsm/www/delivery/menu-mk.tcl	14 Feb 2009 22:33:20 -0000	1.8
@@ -80,7 +80,7 @@
 
 template::multirow create tree_items icon link label indent last_indent target
 
-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]
 
@@ -405,6 +405,5 @@
     }
 }
 # return_url
-set return_url [dotlrn_community::get_community_url \
-                    [dotlrn_community::get_community_id]]
+set return_url [lors::get_community_url]