diff --git a/ChangeLog b/ChangeLog index cfd07d1a3..b869abd64 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2008-04-19 Carsten Dominik + + * xemacs/noutline.el (outline-invisible-p): Require that + invisibility is from outline. + 2008-04-18 Carsten Dominik * lisp/org-clock.el (org-clock): New customization group. diff --git a/xemacs/noutline.el b/xemacs/noutline.el index 5611a9539..f9ea1daeb 100644 --- a/xemacs/noutline.el +++ b/xemacs/noutline.el @@ -416,7 +416,7 @@ at the end of the buffer." (defsubst outline-invisible-p (&optional pos) "Non-nil if the character after point is invisible." - (get-char-property (or pos (point)) 'invisible)) + (eq 'outline (get-char-property (or pos (point)) 'invisible))) (defun outline-visible () (not (outline-invisible-p)))