(calendar-goto-french-date): Fix prompt to match the actual code.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0ba68fd1d80853851bc81bd1b3f6c1c0a6c40bd1..c09a90807a1434653f08497e481b48ae803df503 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-15  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
+
+       * calendar/cal-french.el (calendar-goto-french-date): Fix prompt
+       to match the actual code.
+
 2002-03-11  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
 
        * image.el (image-type-from-file-header): Make temporary buffer

diff --git a/lisp/calendar/cal-french.el b/lisp/calendar/cal-french.el
index ef220be149761ab9e728b94da3d2e16729d57d44..c21375e28cd7d1ac9c034e9d36e525ae1b5f3a0f 100644 (file)
--- a/lisp/calendar/cal-french.el
+++ b/lisp/calendar/cal-french.el
@@ -237,7 +237,7 @@ Echo French Revolutionary date unless NOECHO is t."
            (day (if (> month 12)
                     (- month 12)
                   (calendar-read
-                   "Jour (1-10): "
+                   "Jour (1-30): "
                    '(lambda (x) (and (<= 1 x) (<= x 30))))))
            (month (if (> month 12) 13 month)))
        (list (list month day year)))))