Mercurial > emacs

changeset 16103:4962e89ec8ef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 76bd16bb5906
children f55ff5de378f
files src/textprop.c
diffstat 1 files changed, 12 insertions(+), 12 deletions(-) [+]
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));