changeset 78159:639d3d9bce58

(bookmark-show-all-annotations): Make sure each inserted annotation ends with newline.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Tue, 17 Jul 2007 16:10:13 +0000
parents 8dcc6f809d32
children ba35decf8cc1
files lisp/bookmark.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bookmark.el	Tue Jul 17 04:48:56 2007 +0000
+++ b/lisp/bookmark.el	Tue Jul 17 16:10:13 2007 +0000
@@ -1794,7 +1794,8 @@
          (if (and ann (not (string-equal ann "")))
              ;; insert the annotation, indented by 4 spaces.
              (progn
-               (save-excursion (insert ann))
+               (save-excursion (insert ann) (unless (bolp)
+                                              (insert "\n")))
                (while (< (point) (point-max))
                  (beginning-of-line) ; paranoia
                  (insert "    ")