[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] [PATCH] Fixed compiler warnings including one small bug in ob-li
From: |
Eric Schulte |
Subject: |
Re: [O] [PATCH] Fixed compiler warnings including one small bug in ob-lilypond |
Date: |
Fri, 16 Mar 2012 10:48:14 -0400 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.94 (gnu/linux) |
Applied, Thanks!
Ilya Shlyakhter <address@hidden> writes:
> Re-sending the patch as a correct attachment type.
> One of the warnings indicated an actual (small) bug.
>
> From d0579b6e104b82ec7d3255086384ff8dee0d4e0e Mon Sep 17 00:00:00 2001
> From: Ilya Shlyakhter <address@hidden>
> Date: Fri, 16 Mar 2012 01:52:03 -0400
> Subject: [PATCH] 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
> ---
> lisp/ob-lilypond.el | 2 +-
> lisp/org-pcomplete.el | 5 +++++
> lisp/org-src.el | 2 ++
> lisp/org.el | 9 +++++++--
> 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 951f692..7f8eddb 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)
> @@ -14986,6 +14989,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)
> @@ -15185,7 +15189,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
> @@ -17008,6 +17011,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
--
Eric Schulte
http://cs.unm.edu/~eschulte/