;; -*-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~%"
thing
'(swank-loader::swank-presentations
swank-loader::swank-presentation-streams)))
- swank-loader::*contribs*)))
\ No newline at end of file
+ swank-loader::*contribs*)))