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.4.2.3 -r1.4.2.4
--- openacs-4/packages/notifications/tcl/notification-display-procs.tcl	20 Jan 2003 14:49:45 -0000	1.4.2.3
+++ openacs-4/packages/notifications/tcl/notification-display-procs.tcl	5 Mar 2003 15:04:04 -0000	1.4.2.4
@@ -23,6 +23,11 @@
         Produce a widget for requesting notifications of a given type.   If the notifications package has not been
         mounted then return the empty string.
     } {
+        # 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]
         }