Index: openacs-4/packages/notifications/tcl/notification-email-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-email-procs.tcl,v diff -u -N -r1.9 -r1.10 --- openacs-4/packages/notifications/tcl/notification-email-procs.tcl 22 Sep 2002 15:49:29 -0000 1.9 +++ openacs-4/packages/notifications/tcl/notification-email-procs.tcl 8 Nov 2002 10:04:22 -0000 1.10 @@ -83,9 +83,11 @@ } { # Get email set email [cc_email_from_party $to_user_id] + + # Variable used in the content + set manage_notifications_url [manage_notifications_url] + append content "\n[_ notifications.lt_Getting_too_much_emai]" - append content "\nGetting too much email? Manage your notifications at: [manage_notifications_url]" - acs_mail_lite::send \ -to_addr $email \ -from_addr [reply_address -object_id $reply_object_id -type_id $notification_type_id] \