dot/emacs: Fix the date-format regexps to not eat a following time.

diff --git a/dot/emacs b/dot/emacs
index d4a313e9ae33d182018c7d7cdc1def32dce2f08b..dc3da9b9a4b5fae3e018c2a4ec23f8cde3a611c7 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -385,13 +385,14 @@
       '(24-hours ":" minutes
        (if time-zone " (") time-zone (if time-zone ")")))
 
-(setq diary-date-forms '((day "[-/]" month "[^-/0-9]")
-                        (day " *" monthname "[ \t]*\\(\^M\\|\n\\)")
-                        (backup day " *" monthname "\\W+\\<[^*0-9]")
-                        (day "[-/]" month "[-/]" year "[^0-9]")
-                        (day " *" monthname " *" year "[^0-9]")
-                        (year "[-/]" month "[-/]" day "[^0-9]")
-                        (dayname "\\W")))
+(setq diary-date-forms
+      '((day "[-/]" month "[^-/0-9]")
+       (day " *" monthname "[ \t]*\\(\^M\\|\n\\)")
+       (backup day " *" monthname "\\W+\\<\\([^*0-9]\\|[0-9]+[:aApP]\\)")
+       (day "[-/]" month "[-/]" year "[^0-9]")
+       (day " *" monthname " *" year "[^0-9]")
+       (year "[-/]" month "[-/]" day "[^0-9]")
+       (dayname "\\W")))
 
 ;; Fancy diary handling.