Index: openacs-4/packages/dotlrn-ecommerce/lib/section.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/section.tcl,v
diff -u -N -r1.39 -r1.40
--- openacs-4/packages/dotlrn-ecommerce/lib/section.tcl	26 Jan 2007 14:10:45 -0000	1.39
+++ openacs-4/packages/dotlrn-ecommerce/lib/section.tcl	23 Nov 2007 20:45:21 -0000	1.40
@@ -74,7 +74,7 @@
     }
     
     lappend validate {section_key
-	{ [dotlrn_community::check_community_key_valid_p -community_key $section_key] }
+	{ [dotlrn_community::check_community_key_valid_p -community_key [string trim $section_key]] }
 	"The section '$section_key' key already exists"
     }
 
@@ -499,7 +499,7 @@
 	where section_id = :section_id
     }]
 } -new_data {
-    
+    set section_key [string trim $section_key]    
     if { ! $show_price_option_p } {
 	set show_price_p t
     }
@@ -709,7 +709,7 @@
     }
 
 } -edit_data {
-
+    set section_key [string trim $section_key]
     if { [parameter::get -package_id [ad_conn package_id] -parameter ShowSectionCategoryFields -default 1 ] } {
 	if { $categories == [list [list $community_id $package_id]] } {
 		set categories ""