Index: openacs-4/packages/lorsm/www/admin/shared/add-shared-course-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/shared/add-shared-course-2.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/lorsm/www/admin/shared/add-shared-course-2.tcl	31 Dec 2006 00:36:08 -0000	1.1
+++ openacs-4/packages/lorsm/www/admin/shared/add-shared-course-2.tcl	17 Nov 2008 13:37:55 -0000	1.2
@@ -1,9 +1,9 @@
 # packages/lorsm/www/shared/add-shared-course-2.tcl
 
 ad_page_contract {
-    
+
     Adds an existing course to a .LRN class
-    
+
     @author Ernie Ghiglione (ErnieG@mm.st)
     @creation-date 2004-07-13
     @arch-tag: efa8621f-daa6-4743-9711-28a4195232ec
@@ -22,26 +22,32 @@
 set class_key [dotlrn_community::get_community_type_from_community_id $community_id]
 
 # check if the course is actually shared
-if {[db_string isshared {select isshared from ims_cp_manifests where man_id = :man_id}] == "f"} {
+if {[db_string isshared \
+    {select isshared
+    from ims_cp_manifests
+    where man_id = :man_id}] == "f"} {
+
     # if it ain't complain and quit
     ad_complain "[_ lorsm.lt_The_course_you_are_tr]"
 
 }
 
 # check if the course is already added as course for this class
 
-if {![db_0or1row exists {select man_id, lorsm_instance_id from ims_cp_manifest_class where man_id = :man_id \
-			     and lorsm_instance_id = :package_id \
-			     and community_id = :community_id}]} {
+if {![db_0or1row exists \
+        {select man_id, lorsm_instance_id
+        from ims_cp_manifest_class
+        where man_id = :man_id
+            and lorsm_instance_id = :package_id
+            and community_id = :community_id}]} {
+
     set var1 [lorsm::get_course_name -manifest_id $man_id]
     ad_complain "[_ lorsm.lt_The_course_var1_is_al]"
-
-
 }
 
-db_dml add-course {insert into ims_cp_manifest_class \
-		       (man_id, lorsm_instance_id, community_id, class_key, isenabled, istrackable) \
-		       values \
-		       (:man_id, :package_id, :community_id, :class_key, 't', 'f')}
+db_dml add-course \
+    {insert into ims_cp_manifest_class
+        (man_id, lorsm_instance_id, community_id, class_key, isenabled, istrackable)
+        values (:man_id, :package_id, :community_id, :class_key, 't', 'f')}
 
 ad_returnredirect $return_url