[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100291: diary-lib fix for bug#7536.

[Glenn Morris]

------------------------------------------------------------
revno: 100291
author: Stephen Berman <address@hidden>
committer: Glenn Morris <address@hidden>
branch nick: emacs-23
timestamp: Wed 2010-12-08 17:50:08 -0800
message:
  diary-lib fix for bug#7536.
  * lisp/calendar/diary-lib.el (diary-list-sexp-entries):
  Handle case of no newline at end of file.
modified:
  lisp/ChangeLog
  lisp/calendar/diary-lib.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-12-09 01:46:03 +0000
+++ b/lisp/ChangeLog    2010-12-09 01:50:08 +0000
@@ -1,3 +1,8 @@
+2010-12-09  Stephen Berman  <address@hidden>
+
+       * calendar/diary-lib.el (diary-list-sexp-entries):
+       Handle case of no newline at end of file.  (Bug#7536)
+
 2010-12-09  Glenn Morris  <address@hidden>
 
        * mail/smtpmail.el (smtpmail-send-it): Revert previous change.

=== modified file 'lisp/calendar/diary-lib.el'
--- a/lisp/calendar/diary-lib.el        2010-09-15 02:34:39 +0000
+++ b/lisp/calendar/diary-lib.el        2010-12-09 01:50:08 +0000
@@ -1744,7 +1744,7 @@
         (forward-line 1)
         (while (looking-at "[ \t]")
           (forward-line 1))
-        (backward-char 1)
+        (if (bolp) (backward-char 1))
         (setq entry (buffer-substring-no-properties entry-start (point))))
       (setq diary-entry (diary-sexp-entry sexp entry date)
             literal entry               ; before evaluation