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 -N -r1.64 -r1.65 --- openacs-4/packages/xotcl-core/tcl/bgdelivery-procs.tcl 9 Nov 2018 11:00:40 -0000 1.64 +++ openacs-4/packages/xotcl-core/tcl/bgdelivery-procs.tcl 9 Nov 2018 11:01:36 -0000 1.65 @@ -367,7 +367,7 @@ set subs1 [list] foreach s [set :subscriptions($key)] { if {[catch {$s $method $argument} errMsg]} { - # Treat client disconnection as justa warning + # Treat client disconnection as just a warning if {$::errorCode eq "CLIENTDISCONNECT"} { ns_log warning "$method to subscriber $s (key=$key): $errMsg" } else {