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 -r1.48
--- openacs-4/packages/dotlrn/tcl/class-procs.tcl	22 Sep 2003 18:31:41 -0000	1.47
+++ openacs-4/packages/dotlrn/tcl/class-procs.tcl	29 Apr 2004 15:41:26 -0000	1.48
@@ -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]
         }
     }