summaryrefslogtreecommitdiff
path: root/lisp/calendar/cal-china.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-06-15 14:30:50 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-06-15 14:30:50 +0200
commit777f410666c252751f1f2b79b0d4ae76c546c8b4 (patch)
treecf6c8b90c8b264e8c67309877f9b83702643ca85 /lisp/calendar/cal-china.el
parente64621427b42ca87f548da7cdb5191b6c69fadee (diff)
downloademacs-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.el5
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
["正月" "二月" "三月" "四月" "五月" "六月"