summaryrefslogtreecommitdiff
path: root/lisp/calendar/iso8601.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-01-30 03:02:48 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2020-01-30 03:02:48 +0100
commit1ed7cd41dba444da0b66427eb48852e896ca3742 (patch)
treee83a624096cabea9f483412788d41b2b1763ec19 /lisp/calendar/iso8601.el
parent7c7b91b9fe156b6af4643ca4aa8f4a5c4aeb915f (diff)
downloademacs-1ed7cd41dba444da0b66427eb48852e896ca3742.tar.gz
Give fuller support for obsolete ---12 dates in iso8601
* lisp/calendar/iso8601.el (iso8601--outdated-reduced-precision-date-match): New constant. (iso8601--date-match): Use it.
Diffstat (limited to 'lisp/calendar/iso8601.el')
-rw-r--r--lisp/calendar/iso8601.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/calendar/iso8601.el b/lisp/calendar/iso8601.el
index 858d561f188..906c29b15f4 100644
--- a/lisp/calendar/iso8601.el
+++ b/lisp/calendar/iso8601.el
@@ -69,6 +69,8 @@
"\\([+-]?[0-9][0-9][0-9][0-9]\\)-\\([0-9][0-9]\\)")
(defconst iso8601--outdated-date-match
"--\\([0-9][0-9]\\)-?\\([0-9][0-9]\\)")
+(defconst iso8601--outdated-reduced-precision-date-match
+ "---?\\([0-9][0-9]\\)")
(defconst iso8601--week-date-match
"\\([+-]?[0-9][0-9][0-9][0-9]\\)-?W\\([0-9][0-9]\\)-?\\([0-9]\\)?")
(defconst iso8601--ordinal-date-match
@@ -79,6 +81,7 @@
iso8601--full-date-match
iso8601--without-day-match
iso8601--outdated-date-match
+ iso8601--outdated-reduced-precision-date-match
iso8601--week-date-match
iso8601--ordinal-date-match)))