diff options
| author | Glenn Morris | 2008-03-08 04:24:55 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-03-08 04:24:55 +0000 |
| commit | 9081fdbc64ef21a8fef2f9f4a3c079e3bf16b3e5 (patch) | |
| tree | 4ae3dd05e2d792a03d02985541df9ffa5015e687 | |
| parent | 0d1bb2ffb80848b8658f720c54e6d02219936557 (diff) | |
| download | emacs-9081fdbc64ef21a8fef2f9f4a3c079e3bf16b3e5.tar.gz emacs-9081fdbc64ef21a8fef2f9f4a3c079e3bf16b3e5.zip | |
Comment.
| -rw-r--r-- | lisp/calendar/cal-french.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/calendar/cal-french.el b/lisp/calendar/cal-french.el index 4db2762e86a..08bdea78d76 100644 --- a/lisp/calendar/cal-french.el +++ b/lisp/calendar/cal-french.el | |||
| @@ -39,8 +39,6 @@ | |||
| 39 | 39 | ||
| 40 | ;;; Code: | 40 | ;;; Code: |
| 41 | 41 | ||
| 42 | (defvar date) | ||
| 43 | |||
| 44 | (require 'calendar) | 42 | (require 'calendar) |
| 45 | 43 | ||
| 46 | (defun french-calendar-accents () | 44 | (defun french-calendar-accents () |
| @@ -246,6 +244,9 @@ Echo French Revolutionary date unless NOECHO is t." | |||
| 246 | (calendar-absolute-from-french date))) | 244 | (calendar-absolute-from-french date))) |
| 247 | (or noecho (calendar-print-french-date))) | 245 | (or noecho (calendar-print-french-date))) |
| 248 | 246 | ||
| 247 | (defvar date) | ||
| 248 | |||
| 249 | ;; To be called from list-sexp-diary-entries, where DATE is bound. | ||
| 249 | (defun diary-french-date () | 250 | (defun diary-french-date () |
| 250 | "French calendar equivalent of date diary entry." | 251 | "French calendar equivalent of date diary entry." |
| 251 | (let ((f (calendar-french-date-string date))) | 252 | (let ((f (calendar-french-date-string date))) |