forked from mirrors/org-mode
ob-comint: Silence byte compiler
* lisp/ob-comint.el (org-babel-comint-with-output): Fix code typo.
This commit is contained in:
parent
fe44d55aa0
commit
fb06221534
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue