Mercurial > emacs

changeset 54073:8061b3e9df12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calendar-goto-french-date): Use assoc-string instead of assoc-ignore-case.
author Glenn Morris <rgm@gnu.org>
date Thu, 19 Feb 2004 01:15:40 +0000
parents 7cd960d120ba
children ae72e69df10d
files lisp/calendar/cal-french.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/cal-french.el	Thu Feb 19 01:15:03 2004 +0000
+++ b/lisp/calendar/cal-french.el	Thu Feb 19 01:15:40 2004 +0000
@@ -228,12 +228,12 @@
 				      (concat "Jour " x))
 				   special-days))))))))
 	    (completion-ignore-case t)
-	    (month (cdr (assoc-ignore-case
+	    (month (cdr (assoc-string
                          (completing-read
                           "Mois ou Sansculottide: "
                           month-list
                           nil t)
-			 (calendar-make-alist month-list 1 'car))))
+			 (calendar-make-alist month-list 1 'car) t)))
 	    (day (if (> month 12)
 		     (- month 12)
 		   (calendar-read