From 731a00fbd7293d006744df495d13da5a27d4daec Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 22 Jun 2009 06:29:59 +0000 Subject: (appt-make-list): Fix off-by-one error caused by differing behavior of \n and ^ in strings. (Bug#3385) --- lisp/ChangeLog | 3 +++ lisp/calendar/appt.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2b8da709b9..c2ff91ba0b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-06-22 Glenn Morris + * calendar/appt.el (appt-make-list): Fix off-by-one error caused by + differing behavior of \n and ^ in strings. (Bug#3385) + * emacs-lisp/cl-indent.el: Remove leading "*" from defcustom docs. * emacs-lisp/lisp-mode.el (lisp-indent-offset): Fix safe-local-variable diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index 6b58b8ca55..3c39cd9960 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el @@ -568,7 +568,7 @@ appointment package (if it is not already active)." (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. -- cgit v1.2.3