Commit 9207deb2 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(INTERVAL_VISIBLE_P): Use textget.

(INTERVAL_WRITABLE_P): Use textget.
Check Vinhibit_read_only.
parent 0a4469c9
......@@ -137,11 +137,15 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Is this interval visible? Replace later with cache access */
#define INTERVAL_VISIBLE_P(i) \
(! NULL_INTERVAL_P (i) && NILP (Fmemq (Qinvisible, (i)->plist)))
(! NULL_INTERVAL_P (i) && NILP (textget ((i)->plist, Qinvisible)))
/* Is this interval writable? Replace later with cache access */
#define INTERVAL_WRITABLE_P(i) \
(! NULL_INTERVAL_P (i) && NILP (Fmemq (Qread_only, (i)->plist)))
(! NULL_INTERVAL_P (i) && NILP (textget ((i)->plist, Qread_only)) \
&& (NILP (Vinhibit_read_only) \
|| (CONSP (Vinhibit_read_only) \
&& !NILP (Fmemq (textget ((i)->plist, Qread_only), \
Vinhibit_read_only)))))
/* Macros to tell whether insertions before or after this interval
should stick to it. */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment