Index: openacs-4/packages/notifications/www/subscribers.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/www/subscribers.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/notifications/www/subscribers.tcl 16 Jan 2019 19:15:33 -0000 1.9 +++ openacs-4/packages/notifications/www/subscribers.tcl 3 Sep 2024 15:37:39 -0000 1.10 @@ -15,9 +15,16 @@ permission::require_permission -object_id $object_id -privilege "admin" # first we verify that this object receives notifications -if { ![db_0or1row select_name {}] } { +if { ![db_0or1row select_name { + select acs_object.name(object_id) as name, type_id + from notification_requests + where dynamic_p = 'f' + and object_id = :object_id + order by type_id + fetch first 1 rows only +}] } { # there are no notifications for this object - ad_return_error "[_ notifications.No_Notifications]" "[_ notifications.No_Notifications_text]" + ad_return_exception_page 200 [_ notifications.No_Notifications] [_ notifications.No_Notifications_text] ad_script_abort }