Index: openacs-4/packages/dotlrn/www/one-community-configure-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community-configure-2.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn/www/one-community-configure-2.tcl	25 Oct 2001 16:14:31 -0000	1.2
+++ openacs-4/packages/dotlrn/www/one-community-configure-2.tcl	6 Nov 2001 22:46:00 -0000	1.3
@@ -6,9 +6,13 @@
     @author Ben Adida (ben@openforce.net)
     @creation-date 2001-10-24
 } {
-    portal_id:naturalnum,notnull
+
 }
 
+
+set form [ns_getform]
+set portal_id [ns_set get $form portal_id]
+
 # Check that this is a community type
 if {[ad_parameter community_level_p] != 1} {
     ns_returnredirect "./"
@@ -29,7 +33,9 @@
 } else {
 
     # just call this, it will sort it out
-    portal::configure_dispatch $portal_id [ad_conn query]
+    # portal::configure_dispatch $portal_id [ad_conn query]
+    
+    portal::configure_dispatch_ns_set $portal_id $form
 
     ns_returnredirect "one-community-configure"
 }