(Fset_text_properties): Remove unused variables `unchanged',

`prev_changed', `s' and `len'.

2 files changed, 4 insertions, 3 deletions

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;