[Gardeners] Monthly progress report: Lisp FAQ

[Marco Baringer]

Nikodemus Siivola <nikodemus at random-state.net> writes:

> Nikodemus Siivola <nikodemus at random-state.net> writes:
>
>> (+ "1" 1 "1") ; => 4
>                      ^- 3, of course
>
> I really need to make a binding for "eval-sexp-and-insert-result".

fwiw here's what i use:

(defun mb:eval-in-lisp-insert ()
  (interactive)
  (lexical-let ((current-buffer (current-buffer)))
    (slime-eval-with-transcript
     `(swank:interactive-eval ,(slime-last-expression)) 
     `(lambda (value)
        (with-current-buffer ,current-buffer
          (just-one-space)
          (insert value))))))

-- 
-Marco
Ring the bells that still can ring.
Forget the perfect offering.
There is a crack in everything.
That's how the light gets in.
	-Leonard Cohen