Index: openacs-4/packages/ae-portlet/lib/ae-portlet-chunk.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ae-portlet/lib/ae-portlet-chunk.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ae-portlet/lib/ae-portlet-chunk.xql	4 Feb 2006 14:35:48 -0000	1.1
+++ openacs-4/packages/ae-portlet/lib/ae-portlet-chunk.xql	6 Feb 2006 16:01:07 -0000	1.2
@@ -8,8 +8,14 @@
 	       sc.node_id as comm_node_id, sa.node_id as as_node_id,
 	       s.session_id, s.completed_datetime, a.anonymous_p, 
 	       a.assessment_id as assessment_rev_id
-	from as_assessments a left join as_sessions s on (a.assessment_id = s.assessment_id
-							  and s.subject_id = :user_id), 
+	from as_assessments a 
+	left join as_sessions s
+	on (a.assessment_id = s.assessment_id
+	    and s.subject_id = :user_id
+	    and not s.subject_id in (select grantee_id 
+		 		     from acs_permissions_all 
+				     where privilege = 'admin' 
+				     and object_id in ([join $list_of_package_ids ", "]))), 
 	     cr_revisions cr, cr_items ci, cr_folders cf,
 	     site_nodes sa, site_nodes sc, apm_packages p
 	where a.assessment_id = cr.revision_id
@@ -19,7 +25,9 @@
 	and sa.object_id = cf.package_id
 	and sc.node_id = sa.parent_id
 	and p.package_id = sc.object_id
+
 	$status_clause	
+
 	order by lower(p.instance_name), lower(cr.title)
 	</querytext>
 </fullquery>