Browse Source

Use (with-no-warnings ...) construct for `date' and `entry'.

Bastien Guerry 13 years ago
parent
commit
4f60b5f3a5
2 changed files with 3 additions and 3 deletions
  1. 2 2
      lisp/org-agenda.el
  2. 1 1
      lisp/org-bbdb.el

+ 2 - 2
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

+ 1 - 1
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