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.6 -r1.7 --- openacs-4/packages/notifications/tcl/notification-display-procs.tcl 30 Nov 2002 17:40:18 -0000 1.6 +++ openacs-4/packages/notifications/tcl/notification-display-procs.tcl 4 Jan 2003 09:30:31 -0000 1.7 @@ -22,6 +22,12 @@ } { Produce a widget for requesting notifications of a given type. } { + # Check that we're mounted + if { [empty_string_p [apm_package_url_from_key [notification::package_key]]] } { + return {} + } + + if {[empty_string_p $user_id]} { set user_id [ad_conn user_id] }