* lisp/info.el (Info-fontify-node): Don't hide the last newline.

Fixes: debbugs:12272

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb41fff8c9ac56c5304b7499f69d7d2918302cb8..6154c25e6db048babbaf6278bf4f01cc4f301a13 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-12-03  Juri Linkov  <juri@jurta.org>
+
+       * info.el (Info-fontify-node): Don't hide the last newline.
+       (Bug#12272)
+
 2012-12-01  Leo Liu  <sdl.web@gmail.com>
 
        * files.el (dir-locals-read-from-file): Check file non-empty

diff --git a/lisp/info.el b/lisp/info.el
index 36ffa806f041191ab69843cf48ec6e4d32d7ae85..1e15dcbc9a0ed43fce7cc6161004ecba0a4bff97 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -4826,8 +4826,8 @@ first line or header line, and for breadcrumb links.")
       ;; Hide empty lines at the end of the node.
       (goto-char (point-max))
       (skip-chars-backward "\n")
-      (when (< (1+ (point)) (point-max))
-       (put-text-property (1+ (point)) (point-max) 'invisible t))
+      (when (< (point) (1- (point-max)))
+       (put-text-property (point) (1- (point-max)) 'invisible t))
 
       (set-buffer-modified-p nil))))
 \f