From dae6cb9fe9067aeeeac317287e2410ae02af538f Mon Sep 17 00:00:00 2001 From: Dave Love Date: Thu, 18 May 2000 13:12:08 +0000 Subject: [PATCH] (appt-make-list): Match all lines of entry. From "Stefan M. Walther (SMW)" --- lisp/ChangeLog | 8 ++++++++ lisp/calendar/appt.el | 2 +- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b60936ddd71..e634f91a624 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2000-05-18 Dave Love + + * info.el (Info-fontify-node): Add intangible property as well as + invisible. + + * calendar/appt.el (appt-make-list): Match all lines of entry. + From "Stefan M. Walther (SMW)" + 2000-05-18 Kenichi Handa * international/mule-diag.el (describe-char-after): Call diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index 9b93db96c27..04c8a3dd607 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el @@ -526,7 +526,7 @@ They specify the range of dates that the diary is being processed for." (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))) -- 2.39.5