Browse Source

babel: uniform declare-function placement at the tops of files

Eric Schulte 15 years ago
parent
commit
b329b7a736
4 changed files with 12 additions and 10 deletions
  1. 2 0
      lisp/babel/ob-comint.el
  2. 8 8
      lisp/babel/ob-exp.el
  3. 1 1
      lisp/babel/ob-lob.el
  4. 1 1
      lisp/babel/ob-tangle.el

+ 2 - 0
lisp/babel/ob-comint.el

@@ -36,6 +36,8 @@
 (require 'ob)
 (require 'comint)
 
+(declare-function org-babel-get-src-block-info "ob" (&optional hvo))
+
 (defun org-babel-comint-buffer-livep (buffer)
   "Check if BUFFER is a comint buffer with a live process."
   (let ((buffer (if buffer (get-buffer buffer))))

+ 8 - 8
lisp/babel/ob-exp.el

@@ -34,6 +34,14 @@
 (eval-when-compile
   (require 'cl))
 
+(defvar obe-marker nil)
+(defvar org-current-export-file)
+(defvar org-babel-lob-one-liner-regexp)
+(defvar org-babel-ref-split-regexp)
+(declare-function org-babel-get-src-block-info "ob" (&optional hvo))
+(declare-function org-babel-lob-get-info "ob-lob" ())
+(declare-function org-babel-ref-literal "ob-ref" (ref))
+
 (add-to-list 'org-export-interblocks '(src org-babel-exp-inline-src-blocks))
 (add-to-list 'org-export-interblocks '(lob org-babel-exp-lob-one-liners))
 (add-hook 'org-export-blocks-postblock-hook 'org-exp-res/src-name-cleanup)
@@ -61,14 +69,6 @@ will be indented by this many characters. See
 `org-babel-function-def-export-name' for the definition of a
 source block function.")
 
-(defvar obe-marker nil)
-(defvar org-current-export-file)
-(defvar org-babel-lob-one-liner-regexp)
-(defvar org-babel-ref-split-regexp)
-(declare-function org-babel-get-src-block-info "ob" (&optional header-vars-only))
-(declare-function org-babel-lob-get-info "ob-lob" ())
-(declare-function org-babel-ref-literal "ob-ref" (ref))
-
 (defun org-babel-exp-src-blocks (body &rest headers)
   "Process src block for export.  Depending on the 'export'
 headers argument in replace the source code block with...

+ 1 - 1
lisp/babel/ob-lob.el

@@ -33,7 +33,7 @@
 (require 'ob-table)
 (require 'ob-exp)
 
-(declare-function org-babel-get-src-block-info "ob" (&optional header-vars-only))
+(declare-function org-babel-get-src-block-info "ob" (&optional hvo))
 
 (defvar org-babel-library-of-babel nil
   "Library of source-code blocks.  This is an association list.

+ 1 - 1
lisp/babel/ob-tangle.el

@@ -33,7 +33,7 @@
 (eval-when-compile
   (require 'cl))
 
-(declare-function org-babel-get-src-block-info "ob" (&optional header-vars-only))
+(declare-function org-babel-get-src-block-info "ob" (&optional hvo))
 
 (defvar org-babel-tangle-langs nil
   "List of languages supported by `org-babel-tangle'.  The first