Index: openacs-4/packages/notifications/www/request-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/www/request-new.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/notifications/www/request-new.tcl 1 Aug 2002 14:26:26 -0000 1.2 +++ openacs-4/packages/notifications/www/request-new.tcl 5 Sep 2002 11:13:44 -0000 1.3 @@ -1,4 +1,3 @@ - ad_page_contract { Request a new notification - Ask for more stuff @@ -18,11 +17,16 @@ # Check that the object can be subcribed to notification::security::require_notify_object -object_id $object_id -set page_title "Request Notification for $pretty_name" -set context_bar [ad_context_bar $page_title] +if {[empty_string_p $pretty_name]} { + set page_title "Request Notification" +} else { + set page_title "Request Notification for $pretty_name" +} +set context [list "Request Notification"] + form create subscribe element create subscribe type_id \