X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/9906310798d936a6cacd0ec5a2d3b607e911c423..e623f04118295c92c75eacaed5c50ce72fd108b6:/dot/swank.lisp

diff --git a/dot/swank.lisp b/dot/swank.lisp
index db485ae..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~%"
@@ -12,4 +13,4 @@
 			     thing
 			     '(swank-loader::swank-presentations
 			       swank-loader::swank-presentation-streams)))
-			  swank-loader::*contribs*)))
\ No newline at end of file
+			  swank-loader::*contribs*)))