emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/valign 9f62c59 027/198: * valign.el (valign--pixel-widt


From: Stefan Monnier
Subject: [elpa] externals/valign 9f62c59 027/198: * valign.el (valign--pixel-width-from-to): Fix invisible text detection.
Date: Tue, 1 Dec 2020 18:19:10 -0500 (EST)

branch: externals/valign
commit 9f62c59799b5f4748b04e44282fdf75050db21ed
Author: Yuan Fu <casouri@gmail.com>
Commit: Yuan Fu <casouri@gmail.com>

    * valign.el (valign--pixel-width-from-to): Fix invisible text detection.
---
 valign.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/valign.el b/valign.el
index ea8cd44..247facc 100644
--- a/valign.el
+++ b/valign.el
@@ -121,11 +121,11 @@ calculate images pixel width."
                  (progn
                    (setq width (+ width (car (image-size display t))))
                    (goto-char
-                    (next-single-property-change (point) 'display))))
+                    (next-single-property-change (point) 'display nil to))))
                 ;; 2) Invisible text.
-                ((plist-get (text-properties-at (point)) 'invisible)
+                ((invisible-p (point))
                  (goto-char
-                  (next-single-property-change (point) 'invisible)))
+                  (next-single-property-change (point) 'invisible nil to)))
                 ;; 3) This is a normal character, add glyph width.
                 (t (setq width (+ width (valign--glyph-width-at-point)))
                    (goto-char (1+ (point))))))))



reply via email to

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