diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2011-03-01 08:08:36 +0100 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2011-03-01 08:08:36 +0100 |
| commit | c895af44d4e2ff9408ac54dafaa58e8d057efff5 (patch) | |
| tree | 8ed23be657953fe10f05d100b3551dd8c0659131 | |
| parent | 3805b2c4e46f8efb4df7ad2f4c7a196a09d42a54 (diff) | |
| download | org-mode-c895af44d4e2ff9408ac54dafaa58e8d057efff5.tar.gz | |
Fix some compiler warnings
* lisp/ob.el (org-src-lang-modes): Defvar.
(org-at-item-p): Declare function.
* lisp/ob-calc.el (calc-store): Require.
(var-syms): Defvar.
* lisp/ob-python.el (py-default-interpreter): Defvar.
| -rw-r--r-- | lisp/ob-calc.el | 2 | ||||
| -rw-r--r-- | lisp/ob-python.el | 1 | ||||
| -rw-r--r-- | lisp/ob.el | 2 |
3 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el index b1f8e80..f937def 100644 --- a/lisp/ob-calc.el +++ b/lisp/ob-calc.el @@ -29,6 +29,7 @@ ;;; Code: (require 'ob) (require 'calc) +(require 'calc-store) (unless (featurep 'xemacs) (require 'calc-trail)) (eval-when-compile (require 'ob-comint)) @@ -83,6 +84,7 @@ (with-current-buffer (get-buffer "*Calculator*") (calc-eval (calc-top 1))))) +(defvar var-syms) ; Dynamically scoped from org-babel-execute:calc (defun ob-calc-maybe-resolve-var (el) (if (consp el) (if (and (equal 'var (car el)) (member (cadr el) var-syms)) diff --git a/lisp/ob-python.el b/lisp/ob-python.el index db1d865..5bedbf8 100644 --- a/lisp/ob-python.el +++ b/lisp/ob-python.el @@ -130,6 +130,7 @@ Emacs-lisp table, otherwise return the results as a string." "Return the buffer associated with SESSION." (cdr (assoc session org-babel-python-buffers))) +(defvar py-default-interpreter) (defun org-babel-python-initiate-session-by-key (&optional session) "Initiate a python session. If there is not a current inferior-process-buffer in SESSION @@ -35,6 +35,7 @@ (require 'org-macs) (defvar org-babel-call-process-region-original) +(defvar org-src-lang-modes) (declare-function show-all "outline" ()) (declare-function tramp-compat-make-temp-file "tramp-compat" (filename &optional dir-flag)) @@ -74,6 +75,7 @@ (declare-function org-babel-lob-execute-maybe "ob-lob" ()) (declare-function org-number-sequence "org-compat" (from &optional to inc)) (declare-function org-in-item-p "org-list" ()) +(declare-function org-at-item-p "org-list" ()) (declare-function org-list-parse-list "org-list" (&optional delete)) (declare-function org-list-to-generic "org-list" (LIST PARAMS)) (declare-function org-list-struct "org-list" ()) |