aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/calendar
diff options
context:
space:
mode:
authorKarl Heuer <[email protected]>1999-03-17 05:16:07 +0000
committerKarl Heuer <[email protected]>1999-03-17 05:16:07 +0000
commit50f53db3159885c4dc4c1770944f5bde27d6e7e1 (patch)
tree27811f3aa17ed357c01a86fc4d37dd2241fe5c5c /lisp/calendar
parent2de3834bb50c4609d24aeb6e91195ba29c553c9e (diff)
(appt-make-list): Fix previous change.
Diffstat (limited to 'lisp/calendar')
-rw-r--r--lisp/calendar/appt.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 22cc7e1b84..c667aca3da 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -525,7 +525,7 @@ The time should be in either 24 hour format or am/pm format."
(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\\)?.*"