From: Mark Wooding <mdw@distorted.org.uk>
Date: Wed, 1 Jul 2020 18:43:33 +0000 (+0100)
Subject: dot/swank.lisp: Actually delete the Swank contrib clobbering.
X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/56564da5cea0aa624aff69826615d098ea04e884

dot/swank.lisp: Actually delete the Swank contrib clobbering.

This was introduced in b5bf344506d856bb6d35931354fbb211de847022 because
Swank's presentation-streams machinery broke compatibility of FASL files
between Swanky and plain Lisp systems.  But that was over a decade ago,
and my testing hasn't shown a problem, so let's try without that for
now.
---

diff --git a/dot/swank.lisp b/dot/swank.lisp
index 2000f61..904a984 100644
--- a/dot/swank.lisp
+++ b/dot/swank.lisp
@@ -9,8 +9,7 @@
 
 ;; Maybe inhibit some Swank extensions.
 (let ((forbidden-contribs
-       '(#+sbcl swank-loader::swank-presentations
-	 #+sbcl swank-loader::swank-presentation-streams)))
+       '()))
   (when forbidden-contribs
     (setf swank-loader::*contribs*
 	  (delete-if (lambda (thing) (member thing forbidden-contribs))