mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

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

Browse Source 
From "Stefan M. Walther (SMW)" <walther@netz.klinik.uni-mainz.de>
This commit is contained in:
Dave Love 2000-05-18 13:12:08 +00:00
parent a198aa548e
commit dae6cb9fe9
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/ChangeLog
View File

@ -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

2
lisp/calendar/appt.el
View File

@ -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)))