diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-15 14:30:50 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-15 14:30:50 +0200 |
commit | 777f410666c252751f1f2b79b0d4ae76c546c8b4 (patch) | |
tree | cf6c8b90c8b264e8c67309877f9b83702643ca85 /lisp/calendar/cal-china.el | |
parent | e64621427b42ca87f548da7cdb5191b6c69fadee (diff) | |
download | emacs-777f410666c252751f1f2b79b0d4ae76c546c8b4.tar.gz |
Suppress warning about `entry' in calendar
* lisp/calendar/cal-china.el (entry):
* lisp/calendar/cal-hebrew.el (entry): Suppress warning about
dynamically bound `entry', which has to be bound for
diary-chinese-anniversary and diary-hebrew-birthday to work.
These function can be used in the sexp part of users' diary files.
Diffstat (limited to 'lisp/calendar/cal-china.el')
-rw-r--r-- | lisp/calendar/cal-china.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/calendar/cal-china.el b/lisp/calendar/cal-china.el index d2d086be97a..7fbdb8fc144 100644 --- a/lisp/calendar/cal-china.el +++ b/lisp/calendar/cal-china.el @@ -654,7 +654,10 @@ Echo Chinese date unless NOECHO is non-nil." (autoload 'diary-make-date "diary-lib") (autoload 'diary-ordinal-suffix "diary-lib") (defvar diary-sexp-entry-symbol) -(defvar entry) ;used by `diary-chinese-anniversary' +;; `diary-chinese-anniversary' can be used in users' diary files, and +;; `entry' har to be dynamically bound when that is called. +(with-suppressed-warnings ((lexical entry)) + (defvar entry)) ;used by `diary-chinese-anniversary' (defvar calendar-chinese-month-name-array ["正月" "二月" "三月" "四月" "五月" "六月" |