Index: openacs-4/packages/dotlrn/tcl/club-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/club-procs.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/dotlrn/tcl/club-procs.tcl	13 Jun 2005 11:39:56 -0000	1.23
+++ openacs-4/packages/dotlrn/tcl/club-procs.tcl	14 Jun 2005 09:49:23 -0000	1.24
@@ -131,7 +131,7 @@
     if {$object_type != "person" } {
 	ad_form -extend -name $form -form {
 	    {create_club_p:text(radio) \
-		 {label "[_ dotlrn.Create_club]"} \
+		 {label "[_ dotlrn.Create_Club]"} \
 		 {options {{[_ acs-kernel.common_Yes] "t"} {[_ acs-kernel.common_no] "f"}}} \
 		 {values "f"}
 	    }
@@ -153,7 +153,7 @@
 	# Create the new club and create a link between it and
 	# the new contact.
 
-	set club_id [dotlrn_club::new -pretty_name "$name"]
+	set club_id [dotlrn_club::new -pretty_name "$contact_id"]
 	application_data_link::new -this_object_id $contact_id -target_object_id $club_id
     }
 }