Index: openacs-4/packages/lorsm/www/delivery/body.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/body.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/lorsm/www/delivery/body.tcl 13 Aug 2007 09:20:16 -0000 1.7 +++ openacs-4/packages/lorsm/www/delivery/body.tcl 16 Jan 2008 16:54:45 -0000 1.8 @@ -45,7 +45,7 @@ db_0or1row get_last_viewed { select ims_item_id as imsitem_id, coalesce(acs_object__name(object_id),'Item '||object_id) as last_page_viewed - from views v, + from views_views v, ims_cp_items i, ims_cp_organizations o where v.viewer_id = :user_id @@ -66,7 +66,7 @@ set total_item_count [llength $all_items] set viewed_items [db_list get_viewed_items " select v.object_id - from views v + from views_views v where v.viewer_id = :user_id and v.object_id in ([join $all_items ,]) "]