瀏覽代碼

ob-core: do not declare and define org-babel-call-process-region-original

* lisp/ob-core.el (org-babel-call-process-region-original): Change
  declaration into definition with nil initial value at the beginning
  of the file and drop the later definition.  Add comment that the
  dynamic scoping of this variable is done for tramp.
Achim Gratz 12 年之前
父節點
當前提交
1ffd4f615a
共有 1 個文件被更改,包括 1 次插入2 次删除
  1. 1 2
      lisp/ob-core.el

+ 1 - 2
lisp/ob-core.el

@@ -33,7 +33,7 @@
   (if (memq system-type '(windows-nt cygwin))
       ".exe"
     nil))
-(defvar org-babel-call-process-region-original)
+(defvar org-babel-call-process-region-original nil) ;; dynamically scoped for tramp
 (defvar org-src-lang-modes)
 (defvar org-babel-library-of-babel)
 (declare-function show-all "outline" ())
@@ -2527,7 +2527,6 @@ of the string."
                     (org-babel-chomp (org-reverse-string string) regexp))
                    regexp))
 
-(defvar org-babel-org-babel-call-process-region-original nil)
 (defun org-babel-tramp-handle-call-process-region
   (start end program &optional delete buffer display &rest args)
   "Use Tramp to handle `call-process-region'.