Mercurial > emacs
diff src/textprop.c @ 16103:4962e89ec8ef
(set_properties, add_properties, remove_properties):
Call modify_region with ints.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 04 Sep 1996 03:35:53 +0000 |
parents | a17752d2b0c0 |
children | 32a51f7ba384 |
line wrap: on
line diff
--- a/src/textprop.c Wed Sep 04 03:34:04 1996 +0000 +++ b/src/textprop.c Wed Sep 04 03:35:53 1996 +0000 @@ -300,8 +300,8 @@ XCONS (value)->car)) { modify_region (XBUFFER (object), - make_number (interval->position), - make_number (interval->position + LENGTH (interval))); + interval->position, + interval->position + LENGTH (interval)); record_property_change (interval->position, LENGTH (interval), XCONS (sym)->car, XCONS (value)->car, object); @@ -317,8 +317,8 @@ if (EQ (property_value (interval->plist, XCONS (sym)->car), Qunbound)) { modify_region (XBUFFER (object), - make_number (interval->position), - make_number (interval->position + LENGTH (interval))); + interval->position, + interval->position + LENGTH (interval)); record_property_change (interval->position, LENGTH (interval), XCONS (sym)->car, Qnil, object); @@ -387,8 +387,8 @@ if (BUFFERP (object)) { modify_region (XBUFFER (object), - make_number (i->position), - make_number (i->position + LENGTH (i))); + i->position, + i->position + LENGTH (i)); record_property_change (i->position, LENGTH (i), sym1, Fcar (this_cdr), object); signal_after_change (i->position, LENGTH (i), LENGTH (i)); @@ -406,8 +406,8 @@ if (BUFFERP (object)) { modify_region (XBUFFER (object), - make_number (i->position), - make_number (i->position + LENGTH (i))); + i->position, + i->position + LENGTH (i)); record_property_change (i->position, LENGTH (i), sym1, Qnil, object); signal_after_change (i->position, LENGTH (i), LENGTH (i)); @@ -447,8 +447,8 @@ if (BUFFERP (object)) { modify_region (XBUFFER (object), - make_number (i->position), - make_number (i->position + LENGTH (i))); + i->position, + i->position + LENGTH (i)); record_property_change (i->position, LENGTH (i), sym, Fcar (Fcdr (current_plist)), object); @@ -470,8 +470,8 @@ if (BUFFERP (object)) { modify_region (XBUFFER (object), - make_number (i->position), - make_number (i->position + LENGTH (i))); + i->position, + i->position + LENGTH (i)); record_property_change (i->position, LENGTH (i), sym, Fcar (Fcdr (this)), object); signal_after_change (i->position, LENGTH (i), LENGTH (i));