tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

ob-comint: Fix org-babel-comint-in-buffer 

* lisp/ob-comint.el (org-babel-comint-in-buffer):
Fix bug.

The function’s docstring says it wraps BODY in ‘save-excursion’, but in
fact it did not.
This commit is contained in:
Aaron Ecay 2016-09-03 02:48:23 +01:00
parent d350baf2db
commit 1509906e29
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ob-comint.el
View File

@ -51,8 +51,9 @@ executed inside the protection of `save-excursion' and
(error "Buffer %s does not exist or has no process" ,buffer))
(save-match-data
(with-current-buffer ,buffer
(let ((comint-input-filter (lambda (_input) nil)))
,@body)))))
(save-excursion
(let ((comint-input-filter (lambda (_input) nil)))
,@body))))))
(def-edebug-spec org-babel-comint-in-buffer (form body))
(defmacro org-babel-comint-with-output (meta &rest body)