(displayed-month, displayed-year): Define for compiler.

diff --git a/lisp/calendar/cal-china.el b/lisp/calendar/cal-china.el
index 968926ce58afabb38cd450908bb777c025c3749c..3749b4c6287663032a9ffedab1a84f1bff7931f7 100644 (file)
--- a/lisp/calendar/cal-china.el
+++ b/lisp/calendar/cal-china.el
@@ -49,6 +49,9 @@
 
 ;;; Code:
 
+(defvar displayed-month)
+(defvar displayed-year)
+
 (require 'lunar)
 
 (defvar chinese-calendar-celestial-stem

diff --git a/lisp/calendar/cal-julian.el b/lisp/calendar/cal-julian.el
index 830a1df143b0cbc33e057caa060a46b820847b27..95482cff8a28b9f540d3cb4c2f6745603ac6ca6b 100644 (file)
--- a/lisp/calendar/cal-julian.el
+++ b/lisp/calendar/cal-julian.el
@@ -40,6 +40,9 @@
 
 ;;; Code:
 
+(defvar displayed-month)
+(defvar displayed-year)
+
 (require 'calendar)
 
 (defun calendar-julian-from-absolute (date)

diff --git a/lisp/calendar/cal-move.el b/lisp/calendar/cal-move.el
index f0dca007a588a680c38411f043aea10bfdee80ef..b711e226a0efdf90c2306c2440738a8d35b56ac9 100644 (file)
--- a/lisp/calendar/cal-move.el
+++ b/lisp/calendar/cal-move.el
@@ -36,6 +36,9 @@
 
 ;;; Code:
 
+(defvar displayed-month)
+(defvar displayed-year)
+
 (require 'calendar)
 
 (defun calendar-goto-today ()

diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el
index c6e7f11c7cf5a90ac668b5e9b448c14c94da297d..0678135e2ceef4ccf12a3a8650da930fbe5733e6 100644 (file)
--- a/lisp/calendar/holidays.el
+++ b/lisp/calendar/holidays.el
@@ -51,6 +51,9 @@
 
 ;;; Code:
 
+(defvar displayed-month)
+(defvar displayed-year)
+
 (require 'calendar)
 
 (autoload 'holiday-julian "cal-julian"

diff --git a/lisp/calendar/lunar.el b/lisp/calendar/lunar.el
index 011509514c03e020eca50c8d62bd0c42881ef3b2..183e28b5b6f9820bcbd5da3db2ca10c2eac2f967 100644 (file)
--- a/lisp/calendar/lunar.el
+++ b/lisp/calendar/lunar.el
@@ -49,6 +49,9 @@
 
 ;;; Code:
 
+(defvar displayed-month)
+(defvar displayed-year)
+
 (if (fboundp 'atan)
     (require 'lisp-float-type)
   (error "Lunar calculations impossible since floating point is unavailable"))