Mercurial > emacs
changeset 28968:e6327d3d1115
(appt-make-list): Match all lines of entry.
From "Stefan M. Walther (SMW)" <walther@netz.klinik.uni-mainz.de>
author | Dave Love <fx@gnu.org> |
---|---|
date | Thu, 18 May 2000 13:09:42 +0000 |
parents | 05c01c4206d8 |
children | 84cb017dca64 |
files | lisp/calendar/appt.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/appt.el Thu May 18 13:07:26 2000 +0000 +++ b/lisp/calendar/appt.el Thu May 18 13:09:42 2000 +0000 @@ -526,7 +526,7 @@ (cadr (car entry-list))) 1 -1))) (while (string-match - "[0-9]?[0-9]:[0-9][0-9]\\(am\\|pm\\)?.*" + "[0-9]?[0-9]:[0-9][0-9]\\(am\\|pm\\)?\\(.*\n\\)*.*" time-string) (let* ((appt-time-string (match-string 0 time-string)))