Index: openacs-4/packages/forums/www/forum-view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/forum-view.adp,v diff -u -r1.40 -r1.40.2.1 --- openacs-4/packages/forums/www/forum-view.adp 3 Jul 2015 09:56:53 -0000 1.40 +++ openacs-4/packages/forums/www/forum-view.adp 19 Sep 2015 16:05:32 -0000 1.40.2.1 @@ -9,7 +9,16 @@

-@notification_chunk;noquote@ -

+ - + 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 -r1.35.2.1 -r1.35.2.2 --- openacs-4/packages/forums/www/forum-view.tcl 12 Sep 2015 11:06:27 -0000 1.35.2.1 +++ openacs-4/packages/forums/www/forum-view.tcl 19 Sep 2015 16:05:32 -0000 1.35.2.2 @@ -44,14 +44,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 Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/notifications/lib/notification-widget.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/notifications/lib/notification-widget.tcl'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/notifications/tcl/notification-display-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-display-procs.tcl,v diff -u -r1.20.2.2 -r1.20.2.3 --- openacs-4/packages/notifications/tcl/notification-display-procs.tcl 18 Sep 2015 08:08:43 -0000 1.20.2.2 +++ openacs-4/packages/notifications/tcl/notification-display-procs.tcl 19 Sep 2015 16:05:31 -0000 1.20.2.3 @@ -57,7 +57,7 @@ \"$icon_alt\"$sub_chunk" # if they are an admin give them to view all subscribers if { [permission::permission_p -object_id $object_id -privilege admin] } { - set href [export_vars -base /notifications/subscribers -url {object_id}] + set href [export_vars -base /notifications/subscribers -url {object_id}] append notif_chunk " \[[_ notifications.Subscribers]\]" } @@ -96,7 +96,7 @@ {-request_id:required} {-url:required} } { - Returns the URL that allows one to unsubscribe from a particular request. + Returns the URL that allows one to unsubscribe from a particular request. } { set root_path [apm_package_url_from_key [notification::package_key]]