From 9081fdbc64ef21a8fef2f9f4a3c079e3bf16b3e5 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Sat, 8 Mar 2008 04:24:55 +0000
Subject: [PATCH] Comment.

---
 lisp/calendar/cal-french.el | 5 +++--
 1 file 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 @@
 
 ;;; Code:
 
-(defvar date)
-
 (require 'calendar)
 
 (defun french-calendar-accents ()
@@ -246,6 +244,9 @@ Echo French Revolutionary date unless NOECHO is t."
                        (calendar-absolute-from-french date)))
   (or noecho (calendar-print-french-date)))
 
+(defvar date)
+
+;; To be called from list-sexp-diary-entries, where DATE is bound.
 (defun diary-french-date ()
   "French calendar equivalent of date diary entry."
   (let ((f (calendar-french-date-string date)))
-- 
2.39.5