Commit 0b0f8fa4 authored by Glenn Morris's avatar Glenn Morris
Browse files

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

parent 55d2d634
...@@ -49,6 +49,9 @@ ...@@ -49,6 +49,9 @@
;;; Code: ;;; Code:
(defvar displayed-month)
(defvar displayed-year)
(require 'lunar) (require 'lunar)
(defvar chinese-calendar-celestial-stem (defvar chinese-calendar-celestial-stem
......
...@@ -40,6 +40,9 @@ ...@@ -40,6 +40,9 @@
;;; Code: ;;; Code:
(defvar displayed-month)
(defvar displayed-year)
(require 'calendar) (require 'calendar)
(defun calendar-julian-from-absolute (date) (defun calendar-julian-from-absolute (date)
......
...@@ -36,6 +36,9 @@ ...@@ -36,6 +36,9 @@
;;; Code: ;;; Code:
(defvar displayed-month)
(defvar displayed-year)
(require 'calendar) (require 'calendar)
(defun calendar-goto-today () (defun calendar-goto-today ()
......
...@@ -51,6 +51,9 @@ ...@@ -51,6 +51,9 @@
;;; Code: ;;; Code:
(defvar displayed-month)
(defvar displayed-year)
(require 'calendar) (require 'calendar)
(autoload 'holiday-julian "cal-julian" (autoload 'holiday-julian "cal-julian"
......
...@@ -49,6 +49,9 @@ ...@@ -49,6 +49,9 @@
;;; Code: ;;; Code:
(defvar displayed-month)
(defvar displayed-year)
(if (fboundp 'atan) (if (fboundp 'atan)
(require 'lisp-float-type) (require 'lisp-float-type)
(error "Lunar calculations impossible since floating point is unavailable")) (error "Lunar calculations impossible since floating point is unavailable"))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment