X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/56564da5cea0aa624aff69826615d098ea04e884..d8e07a6c52a7c44b971a0df52ac25602b3eedeff:/dot/swank.lisp 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