From: Pavel Janík <Pavel@Janik.cz>
Date: Fri, 23 Nov 2001 08:11:35 +0000 (+0000)
Subject: (Fset_text_properties): Remove unused variables `unchanged',
X-Git-Tag: ttn-vms-21-2-B4~18281
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=28ff42939f0751704303e723ab993b79842f68dc;p=emacs.git

(Fset_text_properties): Remove unused variables `unchanged',
`prev_changed', `s' and `len'.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 464d9846687..bc9198884f4 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2001-11-23  Pavel Jan,Bm(Bk  <Pavel@Janik.cz>
 
+	* textprop.c (Fset_text_properties): Remove unused variables
+	`unchanged', `prev_changed', `s' and `len'.
+
 	* search.c (Freplace_match): Remove unused variable `inslen'.
 
 	* keymap.c (access_keymap): Remove unused variables `c1' and `c2'.
diff --git a/src/textprop.c b/src/textprop.c
index c56db051bb3..a473bebeab6 100644
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -1245,9 +1245,7 @@ Lisp_Object
 set_text_properties (start, end, properties, object, signal_after_change_p)
      Lisp_Object start, end, properties, object, signal_after_change_p;
 {
-  register INTERVAL i, unchanged;
-  register INTERVAL prev_changed = NULL_INTERVAL;
-  register int s, len;
+  register INTERVAL i;
   Lisp_Object ostart, oend;
 
   ostart = start;