From: Glenn Morris Date: Mon, 22 Jun 2009 06:29:59 +0000 (+0000) Subject: (appt-make-list): Fix off-by-one error caused by X-Git-Tag: emacs-pretest-23.1.90~2483 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=731a00fbd7293d006744df495d13da5a27d4daec;p=emacs.git (appt-make-list): Fix off-by-one error caused by differing behavior of \n and ^ in strings. (Bug#3385) --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2b8da709b92..c2ff91ba0be 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 6b58b8ca552..3c39cd9960e 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.