Index: openacs-4/packages/notifications/tcl/test/notifications-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/test/notifications-test-procs.tcl,v
diff -u -r1.1.2.5 -r1.1.2.6
--- openacs-4/packages/notifications/tcl/test/notifications-test-procs.tcl	8 Jul 2022 14:36:56 -0000	1.1.2.5
+++ openacs-4/packages/notifications/tcl/test/notifications-test-procs.tcl	8 Jul 2022 14:53:08 -0000	1.1.2.6
@@ -46,7 +46,7 @@
         notification::request::subscribers
         notification::new
         notification::get_delivery_methods
-        notification::get_delivery_method_id
+        notification::delivery::get_id
         notification::get_all_intervals
         notification::get_intervals
         notification::interval::get_id_from_name
@@ -141,7 +141,7 @@
             foreach m $all_delivery_methods {
                 lassign $m id name
                 aa_equals "Lookup delivery method '$name' returns the right id" \
-                    [notification::get_delivery_method_id -name $name] $id
+                    [notification::delivery::get_id -name $name] $id
             }
 
             set one_delivery_method_id [lindex $delivery_methods 0 1]