emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: "Peter Münster" <pmlists@free.fr>
To: emacs-orgmode@gnu.org
Subject: [PATCH] Avoid some warnings about `assignment to free variable'
Date: Sat, 18 Feb 2012 21:28:03 +0100	[thread overview]
Message-ID: <87k43jrie0.fsf@micropit.couberia.bzh> (raw)

* lisp/org.el, lisp/org-pcomplete.el: Add some `defvars' to avoid
  warnings about `assignment to free variable'.

 lisp/org-pcomplete.el |    5 +++++
 lisp/org.el           |    2 ++
 2 files changed, 7 insertions(+), 0 deletions(-)

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."
    (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.el b/lisp/org.el
index a81f7fc..45d4b6a 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -12778,6 +12778,7 @@ ACTION can be `set', `up', `down', or a character."
 ;;;; Tags
+(defvar tags-list)
 (defvar org-agenda-archives-mode)
 (defvar org-map-continue-from nil
   "Position from where mapping should continue.
@@ -14957,6 +14958,7 @@ So these are more for recording a certain time/date."
 (defvar org-ans2) ; dynamically scoped parameter
 (defvar org-plain-time-of-day-regexp) ; defined below
+(defvar org-read-date-inactive)
 (defvar org-overriding-default-time nil) ; dynamically scoped
 (defvar org-read-date-overlay nil)

                 reply	other threads:[~2012-02-18 20:33 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87k43jrie0.fsf@micropit.couberia.bzh \
    --to=pmlists@free.fr \
    --cc=emacs-orgmode@gnu.org \


* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox


This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).