Mercurial > emacs

diff lisp/calendar/appt.el @ 103514:9b52cad1866b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(appt-make-list): Fix off-by-one error caused by differing behavior of \n and ^ in strings. (Bug#3385)
author Glenn Morris <rgm@gnu.org>
date Mon, 22 Jun 2009 06:29:59 +0000
parents a9dc0e7c3f2b
children 408195c2a9e5
line wrap: on
line diff
--- a/lisp/calendar/appt.el	Mon Jun 22 06:27:00 2009 +0000
+++ b/lisp/calendar/appt.el	Mon Jun 22 06:29:59 2009 +0000
@@ -568,7 +568,7 @@
                                  (match-end 0)))
                            ;; Get the whole string for this appointment.
                            (appt-time-string
-                            (substring time-string beg (if end (1- end))))
+                            (substring time-string beg end))
                            (appt-time (list (appt-convert-time only-time)))
                            (time-msg (list appt-time appt-time-string)))
                       ;; Add this appointment to appt-time-msg-list.