monnier pushed a commit to branch master
in repository elpa.
commit bdf0deefa7af67fd62decb6db6cce558a976655c
Author: Teemu Likonen <[email protected]>
Date: Fri Jun 19 10:28:14 2009 +0000
Yksinkertaisempi tapa tarkistaa tekstin invisible-ominaisuus
---
wcheck-mode.el | 6 ++----
1 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/wcheck-mode.el b/wcheck-mode.el
index bcbe19d..441a37f 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -720,8 +720,7 @@ only visible text elements; all hidden parts are omitted."
;; in the current point position.
(throw 'infinite t))
- ((get-char-property (match-beginning 1)
- 'invisible buffer)
+ ((invisible-p (match-beginning 1))
;; This point is invisible. Let's jump forward to
;; next change of "invisible" property.
(goto-char (next-single-char-property-change
@@ -783,8 +782,7 @@ table settings defined in LANGUAGE (see
`wcheck-language-data')."
;; We didn't move forward so break the loop.
;; Otherwise we would loop endlessly.
(throw 'infinite t))
- ((get-char-property (match-beginning 1)
- 'invisible buffer)
+ ((invisible-p (match-beginning 1))
;; The point is invisible so jump forward to
;; the next change of "invisible" text property.
(goto-char (next-single-char-property-change
