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.29 -r1.30
--- openacs-4/packages/dotlrn/tcl/class-procs.tcl	29 Mar 2002 19:14:45 -0000	1.29
+++ openacs-4/packages/dotlrn/tcl/class-procs.tcl	11 Apr 2002 04:38:06 -0000	1.30
@@ -72,7 +72,7 @@
     }
 
     ad_proc -public init {} {
-        create base community_type for dotlrn_clubs
+        create base community_type for dotlrn_classes
     } {
         dotlrn_community::init \
             -community_type [community_type] \
@@ -107,9 +107,9 @@
         {-pretty_name:required}
         {-description ""}
     } {
-        Creates a new class, like "Structure and Interpretation of Computer Programs."
-        The return value is the short class name, a key that works in SQL, and that uniquely
-        identifies the class.
+        Creates a new class, like "Structure and Interpretation of
+        Computer Programs." The return value is the short class name,
+        a key that works in SQL, and that uniquely identifies the class.
 
         This class can then be instantiated for a particular semester.
     } {
@@ -122,8 +122,8 @@
                 -department_key $department_key]} {
             ad_return_complaint \
                     1 \
-                    "The name <strong>$pretty_name</strong> is already in use. \n
-                       Please select a different name."
+                    "The name <strong>$pretty_name</strong> is already in use.
+                     <p>Please select a different name."
         }        
 
         db_transaction {