Index: openacs-4/packages/notifications/tcl/notification-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs.tcl,v
diff -u -N -r1.23.2.4 -r1.23.2.5
--- openacs-4/packages/notifications/tcl/notification-procs.tcl	28 Dec 2021 11:40:24 -0000	1.23.2.4
+++ openacs-4/packages/notifications/tcl/notification-procs.tcl	8 Jul 2022 14:36:55 -0000	1.23.2.5
@@ -24,11 +24,16 @@
         return "notifications"
     }
 
-    ad_proc -public get_interval_id {
+    ad_proc -deprecated get_interval_id {
         {-name:required}
     } {
         obtain the interval ID for an interval with the given name.
         Interval names are unique, but are not the primary key.
+
+        DEPRECATED: an API doing the exact same thing was moved into
+        an own namespace
+
+        @see notification::interval::get_id_from_name
     } {
         return [db_string select_interval_id {} -default ""]
     }
@@ -214,7 +219,7 @@
 
                 if { $default_request_data eq "" } {
                     set default_request_data [list \
-                            interval_id [get_interval_id -name "instant"] \
+                            interval_id [notification::interval::get_id_from_name -name "instant"] \
                             delivery_method_id [get_delivery_method_id -name "email"] \
                             format "text"]
                 }