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 -N -r1.17 -r1.18
--- openacs-4/packages/forums-portlet/www/forums-portlet.tcl	9 Nov 2008 23:29:27 -0000	1.17
+++ openacs-4/packages/forums-portlet/www/forums-portlet.tcl	7 Aug 2017 23:48:12 -0000	1.18
@@ -36,15 +36,21 @@
 
 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 {}
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: