From dd01ba9a7704b3ee973c20506253b76b373e2d55 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ian@davenant.greenend.org.uk>
Date: Fri, 31 Dec 2010 15:44:03 +0000
Subject: [PATCH] hostside/multiplex: do not crash when denied callers connect
 (!)

---
 hostside/multiplex | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hostside/multiplex b/hostside/multiplex
index 8ee5832..a0271e3 100755
--- 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 ?" }
-- 
2.30.2