emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/emacs-24 r110986: * lisp/info.el (Info-font


From: Juri Linkov
Subject: [Emacs-diffs] /srv/bzr/emacs/emacs-24 r110986: * lisp/info.el (Info-fontify-node): Don't hide the last newline.
Date: Tue, 04 Dec 2012 01:38:56 +0200
User-agent: Bazaar (2.5.0)

------------------------------------------------------------
revno: 110986
fixes bug: http://debbugs.gnu.org/12272
committer: Juri Linkov <address@hidden>
branch nick: emacs-24
timestamp: Tue 2012-12-04 01:38:56 +0200
message:
  * lisp/info.el (Info-fontify-node): Don't hide the last newline.
modified:
  lisp/ChangeLog
  lisp/info.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-12-01 15:45:38 +0000
+++ b/lisp/ChangeLog    2012-12-03 23:38:56 +0000
@@ -1,3 +1,8 @@
+2012-12-03  Juri Linkov  <address@hidden>
+
+       * info.el (Info-fontify-node): Don't hide the last newline.
+       (Bug#12272)
+
 2012-12-01  Leo Liu  <address@hidden>
 
        * files.el (dir-locals-read-from-file): Check file non-empty

=== modified file 'lisp/info.el'
--- a/lisp/info.el      2012-10-29 10:42:58 +0000
+++ b/lisp/info.el      2012-12-03 23:38:56 +0000
@@ -4826,8 +4826,8 @@
       ;; 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))))
 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]