From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 11 Mar 1995 22:30:33 +0000 (+0000)
Subject: (TEXT_PROP_MEANS_INVISIBLE): New macro.
X-Git-Tag: emacs-19.34~4895
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=47b4c04d0815c835302f15e40fd8601dfc8fae1c;p=emacs.git

(TEXT_PROP_MEANS_INVISIBLE): New macro.
(TEXT_PROP_MEANS_INVISIBLE_WITH_ELLIPSIS): New macro.
---

diff --git a/src/intervals.h b/src/intervals.h
index 386fc81af65..e585497f9fc 100644
--- a/src/intervals.h
+++ b/src/intervals.h
@@ -160,6 +160,23 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
   (! NULL_INTERVAL_P (i) && ! NILP (textget ((i)->plist, Qrear_nonsticky)))
 
 
+/* If PROP is the `invisible' property of a character,
+   this is 1 if the character should be treated as invisible.  */
+
+#define TEXT_PROP_MEANS_INVISIBLE(prop)				\
+  (EQ (current_buffer->invisibility_spec, Qt)			\
+   ? ! NILP (prop)						\
+   : invisible_p (prop, current_buffer->invisibility_spec))
+
+/* If PROP is the `invisible' property of a character,
+   this is 1 if the character should be treated as invisible
+   and should have an ellipsis.  */
+
+#define TEXT_PROP_MEANS_INVISIBLE_WITH_ELLIPSIS(prop)		\
+  (EQ (current_buffer->invisibility_spec, Qt)			\
+   ? 0								\
+   : invisible_ellipsis_p (prop, current_buffer->invisibility_spec))
+
 /* Declared in alloc.c */
 
 extern INTERVAL make_interval ();