From bdbf80aacbc613a5c66783220dfce216a52b7b8f Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sun, 27 Oct 2013 09:54:27 +0100 Subject: [PATCH] ob-tangle: Silence byte-compiler --- lisp/ob-tangle.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el index 29415c47c..0b22467d1 100644 --- a/lisp/ob-tangle.el +++ b/lisp/ob-tangle.el @@ -38,6 +38,7 @@ (declare-function org-back-to-heading "org" (invisible-ok)) (declare-function org-fill-template "org" (template alist)) (declare-function org-babel-update-block-body "org" (new-body)) +(declare-function org-up-heading-safe "org" ()) (declare-function make-directory "files" (dir &optional parents)) (defcustom org-babel-tangle-lang-exts @@ -355,6 +356,7 @@ that the appropriate major-mode is set. SPEC has the form: insert-comment (org-fill-template org-babel-tangle-comment-format-end link-data))))) +(defvar org-comment-string) ;; Defined in org.el (defun org-babel-under-commented-heading-p () "Return t if currently under a commented heading." (if (string-match (concat "^" org-comment-string) @@ -364,7 +366,6 @@ that the appropriate major-mode is set. SPEC has the form: (and (org-up-heading-safe) (org-babel-under-commented-heading-p))))) -(defvar org-comment-string) ;; Defined in org.el (defun org-babel-tangle-collect-blocks (&optional language tangle-file) "Collect source blocks in the current Org-mode file. Return an association list of source-code block specifications of -- 2.11.4.GIT