Index: openacs-4/packages/forums/www/forum-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/forum-view.tcl,v diff -u -N -r1.35 -r1.36 --- openacs-4/packages/forums/www/forum-view.tcl 27 Jun 2015 21:29:52 -0000 1.35 +++ openacs-4/packages/forums/www/forum-view.tcl 7 Aug 2017 23:48:11 -0000 1.36 @@ -8,9 +8,10 @@ } -query { forum_id:naturalnum,notnull - {orderby:token "last_child_post,desc"} - {flush_p:boolean 0} - page:naturalnum,optional + {orderby:token,notnull "last_child_post,desc"} + {flush_p:boolean,notnull 0} + page:naturalnum,optional,notnull + page_size:naturalnum,optional,notnull } @@ -44,14 +45,7 @@ # Show search box? set searchbox_p [parameter::get -parameter ForumsSearchBoxP -default 1] -# Need to quote forum(name) since it is noquoted on display as part of an -# HTML fragment. -set notification_chunk [notification::display::request_widget \ - -type forums_forum_notif \ - -object_id $forum_id \ - -pretty_name $forum(name) \ - -url [ad_conn url]?forum_id=$forum_id \ -] +set forum_url [ad_conn url]?forum_id=$forum_id template::head::add_css -href /resources/forums/forums.css -media all template::head::add_css -href /resources/forums/print.css -media print @@ -63,3 +57,9 @@ set notification_count [notification::request::request_count \ -type_id $type_id \ -object_id $forum_id] + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: