From 831670ab1326546120e55a6d863d8bdb3ba8f29d Mon Sep 17 00:00:00 2001
From: Mark Wooding <mdw@distorted.org.uk>
Date: Sun, 3 Oct 2021 15:21:55 +0100
Subject: [PATCH] dot/swank.lisp: Only force `:fd-handler' on Lisps which can
 do it.

---
 dot/swank.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/dot/swank.lisp b/dot/swank.lisp
index 904a984..cbac155 100644
--- a/dot/swank.lisp
+++ b/dot/swank.lisp
@@ -3,9 +3,9 @@
 #+mdw (cl:in-package #:mdw-hacks)
 
 ;; Miscellaneous configuration.
-(setf swank:*communication-style* :fd-handler
-      swank:*dont-close* t
+(setf swank:*dont-close* t
       *print-right-margin* 77)
+#+(or sbcl cmu) (setf swank:*communication-style* :fd-handler)
 
 ;; Maybe inhibit some Swank extensions.
 (let ((forbidden-contribs
-- 
2.11.0