ob-comint: Silence byte compiler

* lisp/ob-comint.el (org-babel-comint-with-output): Fix code typo.
This commit is contained in:
Nicolas Goaziou 2013-10-30 09:40:40 +01:00
parent fe44d55aa0
commit fb06221534
1 changed files with 5 additions and 5 deletions

View File

@ -75,11 +75,11 @@ or user `keyboard-quit' during execution of body."
(remove-echo (nth 2 meta))
(full-body (nth 3 meta)))
`(org-babel-comint-in-buffer ,buffer
(let ((string-buffer "")
(comint-output-filter-functions
(cons (lambda (text) (setq string-buffer (concat string-buffer text)))
comint-output-filter-functions))
dangling-text raw)
(let* ((string-buffer "")
(comint-output-filter-functions
(cons (lambda (text) (setq string-buffer (concat string-buffer text)))
comint-output-filter-functions))
dangling-text raw)
;; got located, and save dangling text
(goto-char (process-mark (get-buffer-process (current-buffer))))
(let ((start (point))