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.13 -r1.14
--- openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl	19 Feb 2002 19:34:45 -0000	1.13
+++ openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl	7 Mar 2002 19:02:38 -0000	1.14
@@ -69,7 +69,7 @@
     ]
 
     if {[empty_string_p $referer]} {
-        set referer "one-class?class_key=$class_key"
+        set referer "class?class_key=$class_key"
     }
 
     if {${add_instructor}} {
@@ -85,7 +85,7 @@
 
 set context_bar [list \
         {classes Classes} \
-        [list "one-class?class_key=$class_key" "$class_name"] \
+        [list "class?class_key=$class_key" "$class_name"] \
         {New Instance}]
 
 ad_return_template