summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIlya Shlyakhter <ilya_shl@alum.mit.edu>2012-03-16 01:52:03 -0400
committerEric Schulte <eric.schulte@gmx.com>2012-03-16 10:48:31 -0400
commitde4ba0d4cd490b681f3199fa3d15944736f97181 (patch)
tree22ba03cfe06bbd8351af02c3baebc5763b74513f
parent6e525c73f7138362490b3f8ec7947b29c4c32e76 (diff)
downloadorg-mode-de4ba0d4cd490b681f3199fa3d15944736f97181.tar.gz
Fixed compiler warnings, including one small bug in ob-lilypond
* lisp/ob-lilypond.el (ly-compile-lilyfile): Fixed misplaced comma in a quoting expression. * lisp/org-pcomplete.el: added missing defvar definitions for org vars * lisp/org-src.el: added declare-function line for org-babel-tangle * lisp/ob.el (org-scan-tags): protected the variable tags-list with a let (other) added missing defvar declarations. TINYCHANGE
-rw-r--r--lisp/ob-lilypond.el2
-rw-r--r--lisp/org-pcomplete.el5
-rw-r--r--lisp/org-src.el2
-rw-r--r--lisp/org.el9
4 files changed, 15 insertions, 3 deletions
diff --git a/lisp/ob-lilypond.el b/lisp/ob-lilypond.el
index a008b2d..0e9b0c6 100644
--- a/lisp/ob-lilypond.el
+++ b/lisp/ob-lilypond.el
@@ -223,7 +223,7 @@ FILE-NAME is full path to lilypond (.ly) file"
(arg-11 file-name))
(if test
`(,arg-1 ,arg-2 ,arg-3 ,arg-4 ,arg-5 ,arg-6
- ,arg-7 ,arg-8 ,arg-9 ,arg-10, arg-11)
+ ,arg-7 ,arg-8 ,arg-9 ,arg-10 ,arg-11)
(call-process
arg-1 arg-2 arg-3 arg-4 arg-5 arg-6
arg-7 arg-8 arg-9 arg-10 arg-11))))
diff --git a/lisp/org-pcomplete.el b/lisp/org-pcomplete.el
index c475bcc..7a4dc0d 100644
--- a/lisp/org-pcomplete.el
+++ b/lisp/org-pcomplete.el
@@ -50,6 +50,9 @@
:tag "Org"
:group 'org)
+(defvar org-drawer-regexp)
+(defvar org-property-re)
+
(defun org-thing-at-point ()
"Examine the thing at point and let the caller know what it is.
The return value is a string naming the thing at point."
@@ -247,6 +250,8 @@ This needs more work, to handle headings with lots of spaces in them."
lst))
(substring pcomplete-stub 1)))
+(defvar org-drawers)
+
(defun pcomplete/org-mode/drawer ()
"Complete a drawer name."
(let ((spc (save-excursion
diff --git a/lisp/org-src.el b/lisp/org-src.el
index 88217cd..cc5a6ca 100644
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@@ -686,6 +686,8 @@ the language, a switch telling if the content should be in a single line."
(interactive)
(org-src-in-org-buffer (save-buffer)))
+(declare-function org-babel-tangle "ob-tangle" (&optional only-this-block target-file lang))
+
(defun org-src-tangle (arg)
"Tangle the parent buffer."
(interactive)
diff --git a/lisp/org.el b/lisp/org.el
index ad63213..136ba86 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -76,6 +76,7 @@
(require 'gnus-sum))
(require 'calendar)
+(require 'format-spec)
;; Emacs 22 calendar compatibility: Make sure the new variables are available
(when (fboundp 'defvaralias)
@@ -4930,6 +4931,8 @@ sure that we are at the beginning of the line.")
"Matches an headline, putting stars and text into groups.
Stars are put in group 1 and the trimmed body in group 2.")
+(defvar bidi-paragraph-direction)
+
;;;###autoload
(define-derived-mode org-mode outline-mode "Org"
"Outline-based notes management and organizer, alias
@@ -12854,7 +12857,7 @@ headlines matching this string."
(buffer-name (buffer-base-buffer)))))))
(case-fold-search nil)
(org-map-continue-from nil)
- lspos tags
+ lspos tags tags-list
(tags-alist (list (cons 0 org-file-tags)))
(llast 0) rtn rtn1 level category i txt
todo marker entry priority)
@@ -14985,6 +14988,7 @@ So these are more for recording a certain time/date."
(defvar org-read-date-final-answer nil)
(defvar org-read-date-analyze-futurep nil)
(defvar org-read-date-analyze-forced-year nil)
+(defvar org-read-date-inactive)
(defun org-read-date (&optional with-time to-time from-string prompt
default-time default-input inactive)
@@ -15184,7 +15188,6 @@ user."
(defvar def)
(defvar defdecode)
(defvar with-time)
-(defvar org-read-date-inactive)
(defun org-read-date-display ()
"Display the current date prompt interpretation in the minibuffer."
(when org-read-date-display-live
@@ -17007,6 +17010,8 @@ Some of the options can be changed using the variable
(error "Unknown conversion type %s for latex fragments"
processing-type)))))))))
+(declare-function format-spec "format-spec" (format specification))
+
(defun org-create-math-formula (latex-frag &optional mathml-file)
"Convert LATEX-FRAG to MathML and store it in MATHML-FILE.
Use `org-latex-to-mathml-convert-command'. If the conversion is