(concat): Don't re-set string length to its current value.

77437343 · Ken Raeburn · f0bed503 · 77437343 · 77437343
Commit 77437343 authored Aug 10, 2009 by Ken Raeburn
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 1 deletion

src/ChangeLog src/ChangeLog +3 -0

src/fns.c src/fns.c +0 -1

No files found.
--- a/src/ChangeLog
+++ b/src/ChangeLog
 2009-08-10  Ken Raeburn  <raeburn@raeburn.org>

+	* fns.c (concat): Don't re-set string length to its current
+	value.
+
 	* coding.h (decode_coding_string, encode_coding_string): Use
 	SBYTES macro.


--- a/src/fns.c
+++ b/src/fns.c
@@ -661,7 +661,6 @@ concat (nargs, args, target_type, last_special)
 	    }
 	  toindex_byte += thislen_byte;
 	  toindex += thisleni;
-	  STRING_SET_CHARS (val, SCHARS (val));
 	}
      /* Copy a single-byte string to a multibyte string.  */
      else if (STRINGP (this) && STRINGP (val))