Mercurial > emacs
changeset 24493:8cc1b3739d56
(appt-make-list): Fix previous change.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 17 Mar 1999 05:16:07 +0000 |
parents | 46906de4c968 |
children | ea1ab7f25110 |
files | lisp/calendar/appt.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/appt.el Wed Mar 17 04:49:21 1999 +0000 +++ b/lisp/calendar/appt.el Wed Mar 17 05:16:07 1999 +0000 @@ -525,7 +525,7 @@ (calendar-date-equal (calendar-current-date) (car (car entry-list)))) (let ((time-string (substring (prin1-to-string - (cadr (car entry-list))) 2 -1))) + (cadr (car entry-list))) 1 -1))) (while (string-match "[0-9]?[0-9]:[0-9][0-9]\\(am\\|pm\\)?.*"