hostside/multiplex: do not crash when denied callers connect (!)

diff --git a/hostside/multiplex b/hostside/multiplex
index 8ee583212432912b59a736e96f30ad0991159936..a0271e3d96d6dbfa27d573a93b89fce0f70919d8 100755 (executable)
--- a/hostside/multiplex
+++ b/hostside/multiplex
@@ -759,7 +759,7 @@ proc connected {conn} {
     set conns($conn) 1
     set perm [find-permission $c(ipaddr)]
     switch -exact $perm {
-       deny { finally $conn =denied; return }
+       deny { kill-conn $conn =denied; return }
        allow { set c(super) 0 }
        super { set c(super) 1 }
        default { error "$perm ?" }