Index: openacs-4/packages/forums-portlet/www/forums-portlet-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums-portlet/www/Attic/forums-portlet-oracle.xql,v
diff -u -r1.4 -r1.4.6.1
--- openacs-4/packages/forums-portlet/www/forums-portlet-oracle.xql	9 Nov 2008 23:29:27 -0000	1.4
+++ openacs-4/packages/forums-portlet/www/forums-portlet-oracle.xql	2 Jul 2016 10:27:53 -0000	1.4.6.1
@@ -23,4 +23,16 @@
         </querytext>
     </fullquery>
 
+    <partialquery name="restrict_by_private_data_priv">
+        <querytext>
+            and exists (
+                select 1
+                from acs_object_party_privilege_map ppm
+                where ppm.object_id = forums_forums.package_id
+                  and ppm.party_id = :user_id
+                  and ppm.privilege = 'read_private_data'
+            )
+        </querytext>
+    </partialquery>
+
 </queryset>
Index: openacs-4/packages/forums-portlet/www/forums-portlet-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums-portlet/www/Attic/forums-portlet-postgresql.xql,v
diff -u -r1.5 -r1.5.8.1
--- openacs-4/packages/forums-portlet/www/forums-portlet-postgresql.xql	22 May 2007 09:42:09 -0000	1.5
+++ openacs-4/packages/forums-portlet/www/forums-portlet-postgresql.xql	2 Jul 2016 10:27:53 -0000	1.5.8.1
@@ -23,4 +23,10 @@
         </querytext>
     </fullquery>
 
+    <partialquery name="restrict_by_private_data_priv">
+      <querytext>
+	    and acs_permission__permission_p(forums_forums.package_id, :user_id, 'read_private_data')
+        </querytext>
+    </partialquery>
+    
 </queryset>
Index: openacs-4/packages/forums-portlet/www/forums-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums-portlet/www/forums-portlet.tcl,v
diff -u -r1.17.6.1 -r1.17.6.2
--- openacs-4/packages/forums-portlet/www/forums-portlet.tcl	12 Sep 2015 11:06:32 -0000	1.17.6.1
+++ openacs-4/packages/forums-portlet/www/forums-portlet.tcl	2 Jul 2016 10:27:53 -0000	1.17.6.2
@@ -36,15 +36,15 @@
 
 set useReadingInfo [forum::use_ReadingInfo_p]
 if { $useReadingInfo } {
-	set unread_or_new_query {
-		approved_thread_count-coalesce((SELECT forums_reading_info_user.threads_read from forums_reading_info_user  WHERE
-			forums_reading_info_user.forum_id=forums_forums.forum_id AND forums_reading_info_user.user_id=:user_id),0)
-			as count_unread
+    set unread_or_new_query {
+        approved_thread_count-coalesce((SELECT forums_reading_info_user.threads_read from forums_reading_info_user  WHERE
+                forums_reading_info_user.forum_id=forums_forums.forum_id AND forums_reading_info_user.user_id=:user_id),0)
+		as count_unread
     }
 } else {
-	set unread_or_new_query {
-		case when last_post > (cast(current_timestamp as date)- 1) then 't' else 'f' end as new_p
-	}
+    set unread_or_new_query {
+        case when last_post > (cast(current_timestamp as date)- 1) then 't' else 'f' end as new_p
+    }
 }
 
 db_multirow forums $query {}
Fisheye: Tag 1.2.14.1 refers to a dead (removed) revision in file `openacs-4/packages/forums-portlet/www/forums-portlet.xql'.
Fisheye: No comparison available.  Pass `N' to diff?