Mercurial > emacs
changeset 53613:2f99823b0a96
(diary-entry-time): Fix typo/bug:
Remove spurious left square bracket in XX:XXam regexp.
| author | Thien-Thi Nguyen <ttn@gnuvola.org> |
|---|---|
| date | Sat, 17 Jan 2004 13:46:09 +0000 |
| parents | 2ddd2a0d047a |
| children | 6bb21e6405c1 |
| files | lisp/calendar/diary-lib.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/diary-lib.el Sat Jan 17 03:31:26 2004 +0000 +++ b/lisp/calendar/diary-lib.el Sat Jan 17 13:46:09 2004 +0000 @@ -1118,7 +1118,7 @@ (if (equal ?a (downcase (aref s (match-beginning 2)))) 0 1200))) ((string-match ; Hour and minute XX:XXam or XX:XXpm - "\\`[ \t\n\\^M]*\\([0-9]?[0-9]\\)[:.][\\([0-9][0-9]\\)\\([ap]\\)m\\>" s) + "\\`[ \t\n\\^M]*\\([0-9]?[0-9]\\)[:.]\\([0-9][0-9]\\)\\([ap]\\)m\\>" s) (+ (* 100 (% (string-to-int (substring s (match-beginning 1) (match-end 1))) 12))