Index: openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl	23 Oct 2002 12:38:40 -0000	1.21
+++ openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl	11 Dec 2002 13:53:51 -0000	1.22
@@ -104,13 +104,13 @@
     ad_script_abort
 }
 
+# Used by en_US version of new_class_instance message
 set class_instances_pretty_name [parameter::get -localize -parameter class_instances_pretty_name]
 
 set context_bar [list \
     [list classes [_ dotlrn.Classes]] \
     [list "class?class_key=$class_key" $class_name] \
-    [list [_ dotlrn.New] $class_instances_pretty_name] \
+    [_ dotlrn.new_class_instance]
 ]
 
 ad_return_template
-