Index: openacs-4/packages/lorsm/lib/repository-shared-courses.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/lib/repository-shared-courses.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/lorsm/lib/repository-shared-courses.tcl	8 Oct 2008 13:01:05 -0000	1.5
+++ openacs-4/packages/lorsm/lib/repository-shared-courses.tcl	17 Nov 2008 13:36:43 -0000	1.6
@@ -1,16 +1,16 @@
 # packages/lorsm/www/lib/repository-shared-courses.tcl
 
 ad_page_contract {
-    
+
      List all the shared courses in the repository
      View shared courses
-    
+
     @author Ernie Ghiglione (ErnieG@mm.st)
     @creation-date 2004-07-09
     @arch-tag: 9dd389d3-195f-49ed-b610-ee893cde06d6
     @cvs-id $Id$
 } {
-    
+
 } -properties {
 } -validate {
 } -errors {
@@ -35,44 +35,43 @@
         course_name {
             label "[_ lorsm.Available_Courses]"
             display_col course_name
-            link_url_eval {[export_vars -base $community_url/lorsm/admin/shared/course-info {man_id fs_package_id folder_id}]}
+            link_url_eval {[export_vars \
+                                -base $community_url/lorsm/admin/shared/course-info \
+                                {man_id fs_package_id folder_id}]}
             link_html {title "[_ lorsm.Access_Course]"}
 
-        }
-        hasmetadata {
+        } hasmetadata {
             label "[_ lorsm.Metadata_1]"
             link_url_eval {[export_vars -base $community_url/lorsm/md {ims_md_id}]}
             link_html {title "[_ lorsm.See_metadata]" }
-	    html { align center }
-        }
-        creation_user {
+            html { align center }
+
+        } creation_user {
             label "[_ lorsm.Owner]"
             display_eval {[person::name -person_id $creation_user]}
             link_url_eval {[acs_community_member_url -user_id $creation_user]}
-        }
-        creation_date {
+        } creation_date {
             label "[_ lorsm.Creation_Date]"
             display_eval {[lc_time_fmt $creation_date "%x %X"]}
-        }
-	add {
-	    label ""
-	    display_eval {[_ lorsm.Add_Course]}
-	    link_url_eval {[export_vars -base $community_url/lorsm/admin/add-shared-course {man_id}]}
-	    link_html {title "[_ lorsm.lt_Add_course_to_my_clas]" class button}
 
-	}
-        admin {
+        } add {
+            label ""
+            display_eval {[_ lorsm.Add_Course]}
+            link_url_eval {[export_vars \
+                            -base $community_url/lorsm/admin/add-shared-course {man_id}]}
+            link_html {title "[_ lorsm.lt_Add_course_to_my_clas]" class button}
+
+        } admin {
             label "[_ lorsm.Course_Info]"
-	    display_eval {Info/View}
+            display_eval {Info/View}
             link_url_eval {[export_vars -base $community_url/lorsm/admin/shared/course-info man_id]}
             link_html {title "[_ lorsm.Info]" class button}
-	    html { align center }
+            html { align center }
         }
     }
 
-
 db_multirow -extend { ims_md_id community_url } d_courses select_d_courses {
-    select 
+    select
            cp.man_id,
            cp.course_name,
            cp.identifier,
@@ -83,20 +82,18 @@
            end as hasmetadata,
            cp.fs_package_id,
            cp.folder_id,
-	   acs.creation_user,
-	   acs.creation_date,
-	   acs.context_id
-    from
-           ims_cp_manifests cp, acs_objects acs
-    where 
-           cp.man_id = acs.object_id
-    and
-           cp.isshared = 't'
-    and cp.man_id in ( select cr.live_revision from cr_items cr
-                       where content_type = 'ims_manifest_object' )
+       acs.creation_user,
+       acs.creation_date,
+       acs.context_id
+    from ims_cp_manifests cp, acs_objects acs
+    where cp.man_id = acs.object_id
+        and cp.isshared = 't'
+        and cp.man_id in ( select cr.live_revision
+            from cr_items cr
+            where content_type = 'ims_manifest_object' )
     order by acs.creation_date desc
 } {
     set ims_md_id $man_id
     set community_url $com_url
 }
- 
+