Index: openacs-4/packages/notifications/lib/notification-widget.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/lib/notification-widget.tcl,v
diff -u -r1.3.2.3 -r1.3.2.4
--- openacs-4/packages/notifications/lib/notification-widget.tcl	9 Aug 2023 11:34:20 -0000	1.3.2.3
+++ openacs-4/packages/notifications/lib/notification-widget.tcl	9 Aug 2023 11:50:07 -0000	1.3.2.4
@@ -17,14 +17,24 @@
 }
 
 set type_id [notification::type::get_type_id -short_name $type]
-set request_id [notification::request::get_request_id -type_id $type_id -object_id $object_id -user_id $user_id]
-    
+set request_id [notification::request::get_request_id \
+                    -type_id $type_id \
+                    -object_id $object_id \
+                    -user_id $user_id]
+
 if {$request_id ne ""} {
-    set sub_url [notification::display::unsubscribe_url -request_id $request_id -url $url]
+    set sub_url [notification::display::unsubscribe_url \
+                     -request_id $request_id \
+                     -url $url]
     set title [_ notifications.lt_Ubsubscribe_Notification_]
     set sub_chunk [_ notifications.lt_You_have_requested_no]
 } else {
-    set sub_url [notification::display::subscribe_url -type $type -object_id $object_id -url $url -user_id $user_id -pretty_name $pretty_name]
+    set sub_url [notification::display::subscribe_url \
+                     -type $type \
+                     -object_id $object_id \
+                     -url $url \
+                     -user_id $user_id \
+                     -pretty_name $pretty_name]
     set title [_ notifications.lt_Request_Notification_]
     set sub_chunk [_ notifications.lt_You_may_a_hrefsub_url]
 }
@@ -38,4 +48,3 @@
 #    tcl-indent-level: 4
 #    indent-tabs-mode: nil
 # End:
-