diff options
author | Marco Wahl <marcowahlsoft@gmail.com> | 2018-09-23 16:01:27 +0200 |
---|---|---|
committer | Marco Wahl <marcowahlsoft@gmail.com> | 2018-09-23 16:01:27 +0200 |
commit | 3eefa73afec5a2d4acaa759c04a85cc6043128e1 (patch) | |
tree | cc6a1852c0524a4e51ad465ca990e619f9c032e8 | |
parent | 4931fc8e2b4d58116b2078f185cfb620eb8d888c (diff) | |
download | org-mode-3eefa73afec5a2d4acaa759c04a85cc6043128e1.tar.gz |
org-bbdb: fix anniversary with format MM-DD
* lisp/org-bbdb.el (org-bbdb-anniv-extract-date): Fix the pattern to
be able to match a pair.
Reported by
From: leandro@disroot.org
Subject: Anniversaries from BBDB
Newsgroups: gmane.emacs.orgmode
To: emacs-orgmode@gnu.org
Date: Thu, 20 Sep 2018 22:08:12
-rw-r--r-- | lisp/org-bbdb.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-bbdb.el b/lisp/org-bbdb.el index 5d36379..dead49e 100644 --- a/lisp/org-bbdb.el +++ b/lisp/org-bbdb.el @@ -300,7 +300,7 @@ italicized, in all other cases it is left unchanged." Argument TIME-STR is the value retrieved from BBDB. If YYYY- is omitted it will be considered unknown." (pcase (org-split-string time-str "-") - (`(,a ,b nil) (list (string-to-number a) (string-to-number b) nil)) + (`(,a ,b) (list (string-to-number a) (string-to-number b) nil)) (`(,a ,b ,c) (list (string-to-number b) (string-to-number c) (string-to-number a))))) |