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.9 -r1.10
--- openacs-4/packages/dotlrn/www/admin/club-new.tcl	11 Mar 2002 22:26:37 -0000	1.9
+++ openacs-4/packages/dotlrn/www/admin/club-new.tcl	16 Mar 2002 17:38:08 -0000	1.10
@@ -16,12 +16,6 @@
 
 form create add_club
 
-element create add_club club_key \
-    -label "[ad_parameter clubs_pretty_name] Key (a short name, no spaces)" \
-    -datatype text \
-    -widget text \
-    -html {size 60}
-
 element create add_club pretty_name \
     -label "Name" \
     -datatype text \
@@ -49,11 +43,10 @@
 
 if {[form is_valid add_club]} {
     form get_values add_club \
-        club_key pretty_name description join_policy referer
+         pretty_name description join_policy referer
 
     set key [dotlrn_club::new \
         -description $description \
-        -key $club_key \
         -pretty_name $pretty_name \
         -join_policy $join_policy]