(diary-list-entries): Also hide the terminating newline.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 80ade05df29055d122444ce43918bce875f99d2c..4d07c3fbf736d059044390ba667413ff7aea3fd2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,12 @@
+2005-11-16  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * calendar/diary-lib.el (diary-list-entries): Also hide the
+       terminating newline.
+
 2005-11-16  Carsten Dominik  <dominik@science.uva.nl>
 
-       * textmodes/reftex.el (reftex-use-fonts): removed the check for
-       window-system, to allow fonts on tty. 
+       * textmodes/reftex.el (reftex-use-fonts): Remove the check for
+       window-system, to allow fonts on tty.
 
 2005-11-17  Nick Roberts  <nickrob@snap.net.nz>
 

diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index 98c8b6a5dd52bdc5527ed526f73e7345b7788ae4..18d984d9ae90608ad8de1b3e535c32ccede81fff 100644 (file)
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -452,7 +452,8 @@ If LIST-ONLY is non-nil don't modify or display the buffer, only return a list."
                                 2))
                              (while (looking-at " \\|\^I")
                                (re-search-forward "\^M\\|\n" nil 'move))
-                             (unless (eobp) (backward-char 1))
+                             (unless (and (eobp) (not (bolp)))
+                               (backward-char 1))
                              (unless list-only
                                (remove-overlays date-start (point)
                                                 'invisible 'diary))