(appt-make-list): Match all lines of entry.

From "Stefan M. Walther (SMW)" <walther@netz.klinik.uni-mainz.de>

2 files changed, 9 insertions, 1 deletions

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  <fx@gnu.org>
+
+        * 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)" <walther@netz.klinik.uni-mainz.de>
+
 2000-05-18  Kenichi Handa  <handa@etl.go.jp>
 
         * 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)))