Index: openacs-4/packages/notifications/tcl/notification-type-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-type-procs.tcl,v
diff -u -N -r1.16.2.4 -r1.16.2.5
--- openacs-4/packages/notifications/tcl/notification-type-procs.tcl	7 Jul 2022 14:39:08 -0000	1.16.2.4
+++ openacs-4/packages/notifications/tcl/notification-type-procs.tcl	8 Jul 2022 08:50:55 -0000	1.16.2.5
@@ -50,7 +50,10 @@
         if { $all_delivery_methods_p } {
             db_dml enable_all_delivery_methods {}
         }
-        
+
+        # Cache the new type_id right away
+        set type_id [notification::type::get_type_id -short_name $short_name]
+
         return $type_id
     }