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