Index: openacs-4/packages/dotlrn/www/admin/club-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/club-new.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn/www/admin/club-new.tcl	10 Jan 2002 19:30:18 -0000	1.4
+++ openacs-4/packages/dotlrn/www/admin/club-new.tcl	15 Jan 2002 20:47:02 -0000	1.5
@@ -7,13 +7,17 @@
 } -query {
     {referer "clubs"}
 } -properties {
+    title:onevalue
     context_bar:onevalue
 }
 
+set title "New [ad_parameter clubs_pretty_name]"
+set context_bar [list [list clubs [ad_parameter clubs_pretty_plural]] New]
+
 form create add_club
 
 element create add_club club_key \
-    -label "Club Key (a short name, no spaces)" -datatype text -widget text -html {size 50}
+    -label "[ad_parameter clubs_pretty_name] Key (a short name, no spaces)" -datatype text -widget text -html {size 50}
 
 element create add_club name \
     -label "Name" -datatype text -widget text -html {size 50}
@@ -36,6 +40,4 @@
     ad_script_abort
 }
 
-set context_bar {{clubs Clubs} New}
-
 ad_return_template