From 4f60b5f3a525e1fee299c5222b779bb2a24fc666 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Thu, 17 May 2012 10:17:47 +0200 Subject: [PATCH] Use (with-no-warnings ...) construct for `date' and `entry'. --- lisp/org-agenda.el | 4 ++-- lisp/org-bbdb.el | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index eea299881..07e6a4f3c 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -91,8 +91,8 @@ (defvar org-agenda-buffer-name) (defvar org-agenda-overriding-header) (defvar org-agenda-title-append nil) -(defvar entry) -(defvar date) +(with-no-warnings (defvar entry)) ;; unprefixed, from calendar.el +(with-no-warnings (defvar date)) ;; unprefixed, from calendar.el (defvar org-agenda-undo-list) (defvar org-agenda-pending-undo-list) (defvar original-date) ; dynamically scoped, calendar.el does scope this diff --git a/lisp/org-bbdb.el b/lisp/org-bbdb.el index 408305ee9..18f1dc900 100644 --- a/lisp/org-bbdb.el +++ b/lisp/org-bbdb.el @@ -122,7 +122,7 @@ (declare-function calendar-leap-year-p "calendar" (year)) (declare-function diary-ordinal-suffix "diary-lib" (n)) -(defvar date) ;; dynamically scoped from Org +(with-no-warnings (defvar date)) ;; unprefixed, from calendar.el ;; Customization