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.11 -r1.12
--- openacs-4/packages/notifications/tcl/notification-display-procs.tcl	17 May 2003 10:54:25 -0000	1.11
+++ openacs-4/packages/notifications/tcl/notification-display-procs.tcl	20 Jun 2003 15:25:45 -0000	1.12
@@ -40,9 +40,11 @@
         
         if {![empty_string_p $request_id]} {
             set sub_url [unsubscribe_url -request_id $request_id -url $url]
+            set pretty_name [ad_quotehtml $pretty_name]
             set sub_chunk "[_ notifications.lt_You_have_requested_no]"
         } else {
             set sub_url [subscribe_url -type $type -object_id $object_id -url $url -user_id $user_id -pretty_name $pretty_name]
+            set pretty_name [ad_quotehtml $pretty_name]
             set sub_chunk "[_ notifications.lt_You_may_a_hrefsub_url]"
         }