[slime-devel] slime-display-compilation-output and slime-eval-with-transcript

[Yoni Rabkin Katzenell]

Hello,

C-c C-k takes the value of slime-display-compilation-output into
account. I wanted the same to be true of C-M-x so I changed
slime-eval-with-transcript:

(defun slime-eval-with-transcript ...
...
    (slime-eval-async form
                      (lambda (value)
                        (with-current-buffer (slime-output-buffer)
=>			  (when slime-display-compilation-output
			    (slime-show-last-output))
                          (cond (fn (funcall fn value))
                                (t (message "%s" value))))))))

Is there a simpler way to get the same result?

-- 
   "Cut your own wood and it will warm you twice"