Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/lib/user-lorsm-oracle.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/lib/user-lorsm-postgresql.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/lib/user-lorsm.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/lib/user-lorsm.tcl,v
diff -u -r1.8.2.5 -r1.8.2.5.2.1
--- openacs-4/packages/lorsm/lib/user-lorsm.tcl	11 Jul 2006 19:19:36 -0000	1.8.2.5
+++ openacs-4/packages/lorsm/lib/user-lorsm.tcl	22 Nov 2006 12:09:14 -0000	1.8.2.5.2.1
@@ -7,11 +7,8 @@
     @author Ernie Ghiglione (ErnieG@mm.st)
     @creation-date 2004-06-15
     @arch-tag: 9d893919-9a02-45cd-b6ad-19e3a34ba747
-<<<<<<< user-lorsm.tcl
     @cvs-id $Id$
-=======
-    @cvs-id $Id$
->>>>>>> 1.8.2.4
+
 } {
     
 } -properties {
@@ -101,17 +98,7 @@
 
             # micheles
    	    set context [site_node::get_url_from_object_id -object_id $lorsm_instance_id]
-	    if ([db_0or1row query "
-    		select
-           		cpr.man_id,
-           		cpr.res_id,
-                        'delivery' as needscorte
-    			from
-           			ims_cp_resources cpr
-    			where
-				cpr.man_id = :man_id 
-			order by cpr.scorm_type desc limit 1"
-		]) {
+	    if ([db_0or1row query {} ]) {
 
 
 		ns_log Debug "lorsm - $needscorte"
@@ -128,9 +115,9 @@
         # DEDS: these are expensive
         # and for demo purposes only
         db_0or1row get_last_viewed { }
-        set all_items [db_list get_total_items { }]
+        set all_items [db_list get_total_items {}]
         set total_item_count [llength $all_items]
-        set viewed_items [db_list get_viewed_items { }]
+        set viewed_items [db_list get_viewed_items {}]
         set viewed_item_count [llength $viewed_items]
 
         ns_log Debug "lorsm - viewed_item_count: $viewed_item_count"
Index: openacs-4/packages/lorsm/lib/user-lorsm.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/lib/user-lorsm.xql,v
diff -u -r1.1.2.1 -r1.1.2.1.2.1
--- openacs-4/packages/lorsm/lib/user-lorsm.xql	13 Jun 2005 15:10:43 -0000	1.1.2.1
+++ openacs-4/packages/lorsm/lib/user-lorsm.xql	22 Nov 2006 12:09:14 -0000	1.1.2.1.2.1
@@ -24,7 +24,7 @@
            ims_cp_manifests cp, 
 	   acs_objects acs, 
            ims_cp_manifest_class cpmc, 
-           lorsm_course_presentation_formats pf
+           lorsm_course_presentation_fmts pf
 	where 
            cp.man_id = acs.object_id
 	and
@@ -40,21 +40,6 @@
   </querytext>
 </fullquery>
 
-<fullquery name="get_last_viewed">
-  <querytext>
-            select v.last_viewed
-              from views v,
-                   ims_cp_items i,
-                   ims_cp_organizations o
-             where v.viewer_id = :user_id
-               and v.object_id = i.ims_item_id
-               and i.org_id = o.org_id
-               and o.man_id = :man_id
-            order by v.last_viewed desc
-            limit 1
-  </querytext>
-</fullquery>
-
 <fullquery name="get_total_items">
   <querytext>
             select i.ims_item_id
@@ -67,21 +52,18 @@
 
 <fullquery name="get_viewed_items">
   <querytext>
-            select v.object_id
-              from views v
-             where v.viewer_id = :user_id
-               and v.object_id in ([join $all_items ,])
+	select v.object_id
+	from views_views v
+	where v.viewer_id = :user_id
+	and v.object_id in ([join $all_items ", "])
   </querytext>
 </fullquery>
 
 <fullquery name="get_item_id">
   <querytext>
-	select 
-		item_id 
-	from 
-		cr_revisions 
-	where 
-		revision_id = :man_id
+	select item_id 
+	from cr_revisions 
+	where revision_id = :man_id
   </querytext>
 </fullquery>