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.9 -r1.10
--- openacs-4/packages/dotlrn/tcl/applets-procs.tcl	29 May 2002 04:45:23 -0000	1.9
+++ openacs-4/packages/dotlrn/tcl/applets-procs.tcl	29 May 2002 17:27:57 -0000	1.10
@@ -136,7 +136,7 @@
         }
 
         if {[empty_string_p $pretty_name]} {
-            set pretty $package_key
+            set pretty_name $package_key
         }
 
         # Find the parent node