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