debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-12-22 17:34:54 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: remove unused `point-invisible-p' function

Browse source 
`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:
Dmitry Kurochkin 2011-11-06 13:04:01 +04:00 committed by David Bremner
parent 8809e09dcc
commit 34aa8e8a9c
1 changed files with 0 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
emacs/notmuch-lib.el
View file

@ -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)