mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-12-23 01:44:52 +01:00
emacs: remove unused `point-invisible-p' function
`point-invisible-p' does not work correctly when `invisible' property is a list. There are standard `invisible-p' and related functions that should be used instead.
This commit is contained in:
parent
8809e09dcc
commit
34aa8e8a9c
1 changed files with 0 additions and 15 deletions
|
@ -105,21 +105,6 @@ the user hasn't set this variable with the old or new value."
|
|||
|
||||
;;
|
||||
|
||||
;; XXX: This should be a generic function in emacs somewhere, not
|
||||
;; here.
|
||||
(defun point-invisible-p ()
|
||||
"Return whether the character at point is invisible.
|
||||
|
||||
Here visibility is determined by `buffer-invisibility-spec' and
|
||||
the invisible property of any overlays for point. It doesn't have
|
||||
anything to do with whether point is currently being displayed
|
||||
within the current window."
|
||||
(let ((prop (get-char-property (point) 'invisible)))
|
||||
(if (eq buffer-invisibility-spec t)
|
||||
prop
|
||||
(or (memq prop buffer-invisibility-spec)
|
||||
(assq prop buffer-invisibility-spec)))))
|
||||
|
||||
(defun notmuch-remove-if-not (predicate list)
|
||||
"Return a copy of LIST with all items not satisfying PREDICATE removed."
|
||||
(let (out)
|
||||
|
|
Loading…
Reference in a new issue