From f169435d3d4a71e3d0f042394034033a8acbf972 Mon Sep 17 00:00:00 2001
Message-Id: <f169435d3d4a71e3d0f042394034033a8acbf972.1718723008.git.mdw@distorted.org.uk>
From: Mark Wooding <mdw@chiark.greenend.org.uk>
Date: Sat, 27 Jun 2020 12:56:27 +0100
Subject: [PATCH] dot/swank.lisp: Fix the right margin to 77 columns in SLIME.
Organization: Straylight/Edgeware

From: Mark Wooding <mdw@distorted.org.uk>

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

diff --git a/dot/swank.lisp b/dot/swank.lisp
index 62f8160..3743891 100644
--- a/dot/swank.lisp
+++ b/dot/swank.lisp
@@ -1,7 +1,8 @@
 ;; -*-lisp-*-
 
 (setf swank:*communication-style* :fd-handler
-      swank:*dont-close* t)
+      swank:*dont-close* t
+      *print-right-margin* 77)
 
 #+sbcl (progn
 	 (format t "******** contribs = ~A~%"
-- 
[mdw]