[AUCTeX-diffs] GNU AUCTeX branch, master, updated. d4ba58533a321bb2ec04a6589de1905190f2e15c

[Tassilo Horn]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".

The branch, master has been updated
       via  d4ba58533a321bb2ec04a6589de1905190f2e15c (commit)
      from  647a8fc8a5678eab472daadc43f9b1c5e9e01264 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit d4ba58533a321bb2ec04a6589de1905190f2e15c
Author: Tassilo Horn <address@hidden>
Date:   Sat Sep 5 01:06:14 2015 +0200

    Fix missing unfontification of invisible property
    
    * font-latex.el (font-latex-unfontify-region): Also remove the
    `invisible' text properties.

diff --git a/ChangeLog b/ChangeLog
index 7ddb7cf..422ad9f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2015-09-05  Tassilo Horn  <address@hidden>
+
+       * font-latex.el (font-latex-unfontify-region): Also remove the
+       `invisible' text properties.
+
 2015-09-04  Mosè Giordano  <address@hidden>
 
        * doc/auctex.texi (Starting a Command): Update references to
diff --git a/font-latex.el b/font-latex.el
index e146f15..d3e853f 100644
--- a/font-latex.el
+++ b/font-latex.el
@@ -1303,16 +1303,18 @@ If optional argument is non-nil, print status messages."
   ;; property is only added if `font-lock-multiline' is bound.)
   (unless (boundp 'font-lock-multiline)
     (remove-text-properties beg end '(font-latex-multiline)))
-  (while (< beg end)
-    (let ((next (next-single-property-change beg 'display nil end))
-         (prop (get-text-property beg 'display)))
-      (if (and (eq (car-safe prop) 'raise)
-              (member (car-safe (cdr prop))
-                      (list (nth 1 (car font-latex-script-display))
-                            (nth 1 (cdr font-latex-script-display))))
-              (null (cddr prop)))
-         (put-text-property beg next 'display nil))
-      (setq beg next))))
+  (let ((start beg))
+    (while (< beg end)
+      (let ((next (next-single-property-change beg 'display nil end))
+           (prop (get-text-property beg 'display)))
+       (if (and (eq (car-safe prop) 'raise)
+                (member (car-safe (cdr prop))
+                        (list (nth 1 (car font-latex-script-display))
+                              (nth 1 (cdr font-latex-script-display))))
+                (null (cddr prop)))
+           (put-text-property beg next 'display nil))
+       (setq beg next)))
+    (remove-text-properties start end '(invisible))))
 
 (defadvice font-lock-after-change-function (before font-latex-after-change
                                                   activate)
@@ -1949,7 +1951,7 @@ END marks boundaries for searching for quotation ends."
 (defface font-latex-doctex-preprocessor-face
   '((t (:inherit (font-latex-doctex-documentation-face
                  font-lock-builtin-face ; Emacs 21 does not provide
-                                        ; the preprocessor face.
+                                       ; the preprocessor face.
                  font-lock-preprocessor-face))))
   "Face used to highlight preprocessor directives in docTeX mode."
   :group 'font-latex-highlighting-faces)

-----------------------------------------------------------------------

Summary of changes:
 ChangeLog     |    5 +++++
 font-latex.el |   24 +++++++++++++-----------
 2 files changed, 18 insertions(+), 11 deletions(-)


hooks/post-receive
-- 
GNU AUCTeX