Index: openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl,v diff -u -r1.28 -r1.29 --- openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl 9 Aug 2002 18:39:30 -0000 1.28 +++ openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl 10 Nov 2002 20:18:04 -0000 1.29 @@ -51,9 +51,15 @@ } { returns the pretty name } { - return "Static (HTML) Data" + return "[_ [pretty_name_key]]" } + ad_proc -private pretty_name_key { + + } { + return "#dotlrn-static.Static_HTML_Data#" + } + ad_proc -public add_applet { } { Add the static applet to dotlrn - for one-time init @@ -65,7 +71,7 @@ dotlrn_applet::mount \ -package_key [package_key] \ -url [package_key] \ - -pretty_name [get_pretty_name] + -pretty_name [pretty_name_key] dotlrn_applet::add_applet_to_dotlrn \ -applet_key [applet_key] \ @@ -252,5 +258,4 @@ listens for the following events: } { } - }