Fix compiler warnings.

This commit is contained in:
Bastien Guerry 2011-10-28 17:26:22 +02:00
parent ef08850783
commit 728611fa77
6 changed files with 13 additions and 0 deletions

View File

@ -33,6 +33,10 @@
(require 'calc-store))
(eval-when-compile (require 'ob-comint))
(declare-function calc-store-into "calc-store" (&optional var))
(declare-function calc-recall "calc-store" (&optional var))
(declare-function math-evaluate-expr "calc-ext" (x))
(defvar org-babel-default-header-args:calc nil
"Default arguments for evaluating an calc source block.")

View File

@ -4584,6 +4584,7 @@ the documentation of `org-diary'."
(setq results (append results rtn))))))))
results))))
(defvar org-heading-keyword-regexp-format) ; defined in org.el
(defun org-agenda-get-todos ()
"Return the TODO information for agenda display."
(let* ((props (list 'face nil

View File

@ -1142,6 +1142,8 @@ calc function to get values from base elements"
;;; Dynamic block for Column view
(defvar org-heading-regexp) ; defined in org.el
(defvar org-heading-keyword-regexp-format) ; defined in org.el
(defun org-columns-capture-view (&optional maxlevel skip-empty-rows)
"Get the column view of the current buffer or subtree.
The first optional argument MAXLEVEL sets the level limit. A

View File

@ -393,6 +393,8 @@ in a window. A non-interactive call will only return the buffer."
(org-open-file pdffile)
(error "PDF file was not produced"))))
(defvar org-heading-keyword-regexp-format) ; defined in org.el
;;;###autoload
(defun org-export-as-docbook (&optional hidden ext-plist
to-buffer body-only pub-dir)

View File

@ -1640,6 +1640,7 @@ from the buffer."
(org-if-unprotected
(replace-match "")))))
(defvar org-heading-keyword-regexp-format) ; defined in org.el
(defun org-export-protect-quoted-subtrees ()
"Mark quoted subtrees with the protection property."
(let ((org-re-quote (format org-heading-keyword-regexp-format

View File

@ -1054,6 +1054,9 @@ OPT-PLIST is the export options list."
line))
;;; org-export-as-html
(defvar org-heading-keyword-regexp-format) ; defined in org.el
;;;###autoload
(defun org-export-as-html (arg &optional hidden ext-plist
to-buffer body-only pub-dir)