Index: openacs-4/packages/xotcl-core/tcl/bgdelivery-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/bgdelivery-procs.tcl,v
diff -u -r1.49.2.2 -r1.49.2.3
--- openacs-4/packages/xotcl-core/tcl/bgdelivery-procs.tcl	3 Oct 2015 18:28:39 -0000	1.49.2.2
+++ openacs-4/packages/xotcl-core/tcl/bgdelivery-procs.tcl	30 Dec 2015 18:09:14 -0000	1.49.2.3
@@ -124,7 +124,7 @@
     }
   }
   fileSpooler proc tick {} {
-    if {[catch {my cleanup} errorMsg]} {ns_log notice "Error during filespooler cleanup: $errorMsg"}
+    if {[catch {my cleanup} errorMsg]} {ns_log error "Error during filespooler cleanup: $errorMsg"}
     my set to [after [my set tick_interval] [list [self] tick]]
   }
   fileSpooler tick
@@ -344,7 +344,7 @@
       set subs1 [list]
       foreach s $subscriptions($key) {
         if {[catch {$s $method $argument} errMsg]} {
-          ns_log notice "error in $method to subscriber $s (key=$key): $errMsg"
+          ns_log error "error in $method to subscriber $s (key=$key): $errMsg"
           $s destroy
         } else {
           lappend subs1 $s