Index: openacs-4/packages/dotlrn/tcl/class-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/class-procs.tcl,v
diff -u -r1.47.6.1 -r1.47.6.2
--- openacs-4/packages/dotlrn/tcl/class-procs.tcl	26 May 2004 15:36:03 -0000	1.47.6.1
+++ openacs-4/packages/dotlrn/tcl/class-procs.tcl	9 Jul 2004 21:19:31 -0000	1.47.6.2
@@ -69,16 +69,16 @@
         db_transaction {
             dotlrn::new_type_portal \
                 -type [community_type] \
-                -pretty_name "test [parameter::get \
+                -pretty_name [parameter::get \
                                   -package_id [dotlrn::get_package_id] \
-                                  -parameter class_instance_portal_pretty_name]"
+                                  -parameter class_instance_portal_pretty_name]
             
             dotlrn_community::init \
                 -community_type [community_type] \
                 -community_type_url_part [get_url_part] \
-                -pretty_name "test [parameter::get \
+                -pretty_name [parameter::get \
                                   -package_id [dotlrn::get_package_id] \
-                                  -parameter classes_pretty_plural]"
+                                  -parameter classes_pretty_plural]
         }
     }