Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v
diff -u -r1.66 -r1.67
--- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	9 Aug 2002 18:39:25 -0000	1.66
+++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	14 Aug 2002 19:24:47 -0000	1.67
@@ -86,7 +86,9 @@
         portal templates
     } {
         db_transaction {
-            dotlrn_community::set_type_package_id [community_type] [get_package_id]
+            dotlrn_community::set_type_package_id \
+                -community_type [community_type] \
+                -package_id [get_package_id]
             
             dotlrn::new_type_portal \
                 -type user \