Index: openacs-4/packages/lorsm/tcl/lorsm-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-install-procs.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/lorsm/tcl/lorsm-install-procs.tcl	17 Oct 2008 10:46:09 -0000	1.12
+++ openacs-4/packages/lorsm/tcl/lorsm-install-procs.tcl	17 Nov 2008 13:36:43 -0000	1.13
@@ -1,9 +1,9 @@
 # packages/lorsm/tcl/lorsm-install-procs.tcl
 
 ad_library {
-    
+
     LORSM Installation procedures
-    
+
     @author Ernie Ghiglione (ErnieG@mm.st)
     @creation-date 2004-08-19
     @arch-tag: 535eebaf-8414-4703-8a39-e115a34b68f1
@@ -30,9 +30,8 @@
 ad_proc -private lorsm::install::package_install {} {
 
     Install the lorsm-templates
-    
+
 } {
-    
     lorsm::install::templates
 
     # by the moment we only have tree format presentations and there is no
@@ -41,25 +40,25 @@
     set pretty_name "[_ lorsm.Classic_Style]"
     # Insert default values for the course presentation formats
     db_dml create_default_format {
-	insert into lorsm_course_presentation_formats values (-1,:pretty_name,'default','delivery')
-    }
-    
+        insert into lorsm_course_presentation_formats
+        values (-1,:pretty_name,'default','delivery')}
+
     set pretty_name "[_ lorsm.lt_Without_LORSM_Index_S]"
     db_dml create_no_index_format {
-	insert into lorsm_course_presentation_formats values (-2,:pretty_name,'without_index','delivery-no-index')
-    }
-    
+        insert into lorsm_course_presentation_formats
+        values (-2,:pretty_name,'without_index','delivery-no-index')}
+
     set pretty_name "[_ lorsm.lt_With_Bottom_Navigatio]"
     db_dml create_no_index_format {
-	insert into lorsm_course_presentation_formats values (-3,:pretty_name,'bottom_navigation_bar','delivery-bottom-bar')
-    }
+        insert into lorsm_course_presentation_formats
+        values (-3,:pretty_name,'bottom_navigation_bar','delivery-bottom-bar')}
 
     set pretty_name "[_ lorsm.lt_With_Progress_Bar]"
     db_dml create_no_index_format {
-	insert into lorsm_course_presentation_formats values (-4,:pretty_name,'progress-bar','delivery-progress-bar')
-    }
+        insert into lorsm_course_presentation_formats
+        values (-4,:pretty_name,'progress-bar','delivery-progress-bar')}
 
-    # Service contract implementations - fts 	 
+    # Service contract implementations - fts
     lorsm::sc::register_implementations
 }
 
@@ -69,37 +68,37 @@
 } {
 
     Upgrade logic
-    
+
 } {
     apm_upgrade_logic \
-	-from_version_name $from_version_name \
-	-to_version_name $to_version_name \
-	-spec {
-	    0.7d 0.8d {
-            set pretty_name "[_ lorsm.lt_With_Progress_Bar]"
-            db_dml create_no_index_format {
-		    insert into lorsm_course_presentation_formats values (-4,:pretty_name,'progress-bar','delivery-progress-bar')
+        -from_version_name $from_version_name \
+        -to_version_name $to_version_name \
+        -spec {
+            0.7d 0.8d {
+                set pretty_name "[_ lorsm.lt_With_Progress_Bar]"
+                db_dml create_no_index_format {
+                    insert into lorsm_course_presentation_formats
+                    values (-4,:pretty_name,'progress-bar','delivery-progress-bar')}
+
+            } 0.8d1 0.8d2 {
+                lorsm::install::templates
+
+            } 0.8d3 0.8d4 {
+                lorsm::install::templates
             }
-	    }
-        0.8d1 0.8d2 {
-            lorsm::install::templates
         }
-        0.8d3 0.8d4 {
-            lorsm::install::templates
-        }
-	}
 }
 
 ad_proc -private lorsm::install::templates {
 } {
     # location where the templates file are
     set temp_location "[acs_root_dir]/packages/lorsm/templates"
 
-    # location where we are going to copy the files to 
+    # location where we are going to copy the files to
     set temp_dir "[acs_root_dir]/templates"
 
     # check if the template directory exists
-    # Otherwise create it. 
+    # Otherwise create it.
     if {![file exists $temp_dir]} {
         file mkdir $temp_dir
     }