diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-15 14:22:38 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-15 14:22:45 +0200 |
commit | e64621427b42ca87f548da7cdb5191b6c69fadee (patch) | |
tree | 784a7bcfa90b82e30f22d055ca7d964348d0748a /lisp/calendar/cal-coptic.el | |
parent | 4262e13a095ff6b1d9738bf3eef7098cefcf3958 (diff) | |
download | emacs-e64621427b42ca87f548da7cdb5191b6c69fadee.tar.gz |
Suppress warning about prefixless date variable in calendar
* lisp/calendar/lunar.el (date):
* lisp/calendar/cal-persia.el (date):
* lisp/calendar/cal-mayan.el (date):
* lisp/calendar/cal-julian.el (date):
* lisp/calendar/cal-iso.el (date):
* lisp/calendar/cal-islam.el (date):
* lisp/calendar/cal-hebrew.el (date):
* lisp/calendar/cal-french.el (date):
* lisp/calendar/cal-coptic.el (date):
* lisp/calendar/cal-china.el (date):
* lisp/calendar/cal-bahai.el (date): Suppress warning about this
prefix-less dynamic variable, because it's part of the documented
calling convention used in the sexp part of users' diary files.
Diffstat (limited to 'lisp/calendar/cal-coptic.el')
-rw-r--r-- | lisp/calendar/cal-coptic.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/calendar/cal-coptic.el b/lisp/calendar/cal-coptic.el index c05f6d329a1..8d223590875 100644 --- a/lisp/calendar/cal-coptic.el +++ b/lisp/calendar/cal-coptic.el @@ -168,9 +168,13 @@ Echo Coptic date unless NOECHO is t." (or noecho (calendar-coptic-print-date))) -(defvar date) +;; The function below is designed to be used in sexp diary entries, +;; and may be present in users' diary files, so suppress the warning +;; about this prefix-less dynamic variable. It's called from +;; `diary-list-sexp-entries', which binds the variable. +(with-suppressed-warnings ((lexical date)) + (defvar date)) -;; To be called from diary-list-sexp-entries, where DATE is bound. ;;;###diary-autoload (defun diary-coptic-date () "Coptic calendar equivalent of date diary entry." |