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 -N -r1.14.2.2.2.3 -r1.14.2.2.2.4
--- openacs-4/packages/notifications/tcl/notification-display-procs.tcl	10 Mar 2007 19:41:00 -0000	1.14.2.2.2.3
+++ openacs-4/packages/notifications/tcl/notification-display-procs.tcl	17 Mar 2007 23:31:05 -0000	1.14.2.2.2.4
@@ -40,12 +40,14 @@
     
     if {![empty_string_p $request_id]} {
         set icon /resources/acs-subsite/email_delete.gif
+	set icon_alt [_ acs-subsite.icon_of_envelope]
         set sub_url [ad_quotehtml [unsubscribe_url -request_id $request_id -url $url]]
         set pretty_name [ad_quotehtml $pretty_name]
         set title [_ notifications.lt_Ubsubscribe_Notification_]
         set sub_chunk "[_ notifications.lt_You_have_requested_no]"
     } else {
         set icon /resources/acs-subsite/email_add.gif
+	set icon_alt [_ acs-subsite.icon_of_envelope]
         set sub_url [ad_quotehtml [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 title [_ notifications.lt_Request_Notification_]
@@ -56,7 +58,7 @@
          return ""
     }
 
-    return "<a href=\"$sub_url\" title=\"$title\"><img src=\"$icon\" alt=\"\" />&nbsp;$sub_chunk</a>"
+    return "<a href=\"$sub_url\" title=\"$title\"><img src=\"$icon\" alt=\"$icon_alt\"> $sub_chunk</a>"
 }
 
 ad_proc -public notification::display::subscribe_url {