Mercurial > emacs
changeset 68956:af2db645bc9d
(allout-hidden-p): Move this defsubts before
allout-overlay-interior-modification-handler, where it is first used.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Fri, 17 Feb 2006 11:01:50 +0000 |
parents | eda7236f83b5 |
children | 6c2ed3d7aa1a |
files | lisp/allout.el |
diffstat | 1 files changed, 7 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/allout.el Fri Feb 17 10:58:37 2006 +0000 +++ b/lisp/allout.el Fri Feb 17 11:01:50 2006 +0000 @@ -1605,6 +1605,13 @@ allout-mode ) ; let* ) ; defun + +;;;_ - Position Assessment +;;;_ > allout-hidden-p (&optional pos) +(defsubst allout-hidden-p (&optional pos) + "Non-nil if the character after point is invisible." + (get-char-property (or pos (point)) 'invisible)) + ;;;_ > allout-minor-mode (defalias 'allout-minor-mode 'allout-mode) @@ -1746,11 +1753,6 @@ ;;;_ #4 Navigation -;;;_ - Position Assessment -;;;_ > allout-hidden-p (&optional pos) -(defsubst allout-hidden-p (&optional pos) - "Non-nil if the character after point is invisible." - (get-char-property (or pos (point)) 'invisible)) ;;;_ : Location Predicates ;;;_ > allout-on-current-heading-p () (defun allout-on-current-heading-p ()