Index: openacs-4/packages/dotlrn/tcl/applets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/applets-procs.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/dotlrn/tcl/applets-procs.tcl	8 Aug 2006 21:26:23 -0000	1.20
+++ openacs-4/packages/dotlrn/tcl/applets-procs.tcl	7 Jun 2007 20:32:27 -0000	1.21
@@ -31,7 +31,8 @@
     ad_proc -public get_applet_url {
         {-applet_key:required}
     } {
-        return [site_nodes::get_info -return url -package_key $applet_key]
+        set applets_node_id [site_node::get_node_id -url [get_url]]
+        return [site_node::get_children -package_key $applet_key -node_id $applets_node_id]
     }
 
     ad_proc -public is_initalized {} {