Add geiser-mode-eval-to-buffer-transformer
commit87d8ad28396dd82920d55837cc6e8265b3f5991d
authorChaos Eternal <chaos@shlug.org>
Sun, 20 Aug 2017 14:23:38 +0000 (20 22:23 +0800)
committerJose Antonio Ortega Ruiz <jao@gnu.org>
Mon, 28 Aug 2017 00:54:04 +0000 (28 02:54 +0200)
tree80097cab68a660b784d3a177a530cce8041899ad
parentc8caccbadb56fd20ac77d770b03bbe2307014038
Add geiser-mode-eval-to-buffer-transformer

geiser-mode-eval-to-buffer-transformer will take 2 argments:
errstring and result
when eval-to-buffer, the result will be transformed by this procedure
e.g.
(setq geiser-mode-eval-to-buffer-transformer
      (lambda (estring x)
(let ((l (length x))
      (p (seq-position x ?\n)))
  (if (and p (< (+ 1 p) l))
      (format "\n#| %s%s\n  |#" estring x)
    (format ";;=> %s%s" estring x)))))
elisp/geiser-mode.el