Просмотр исходного кода

org-bbdb: Ignore case in anniv class string.

Based on Jambunathan's suggestion:
http://article.gmane.org/gmane.emacs.orgmode/28508
Bastien Guerry 14 лет назад
Родитель
Сommit
12e4140f5d
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      lisp/org-bbdb.el

+ 2 - 2
lisp/org-bbdb.el

@@ -322,8 +322,8 @@ This is used by Org to re-create the anniversary hash table."
         (when rec
           (let* ((class (or (nth 2 rec)
                             org-bbdb-default-anniversary-format))
-                 (form (or (cdr (assoc class
-                                       org-bbdb-anniversary-format-alist))
+                 (form (or (cdr (assoc-string
+				 class org-bbdb-anniversary-format-alist t))
                            class))	; (as format string)
                  (name (nth 1 rec))
                  (years (- y (car rec)))