* xterm.c (x_sync_with_move): Really wait 0.5s, not 0.0005s.

[gnu-emacs] / src / ccl.c

diff --git a/src/ccl.c b/src/ccl.c
index 187f60270187f2a3a48efb906d9cf7ab7bf9c287..54093bf5677a33d4c72a791277bdb1609867413a 100644 (file)
--- a/src/ccl.c
+++ b/src/ccl.c
@@ -2160,11 +2160,8 @@ usage: (ccl-execute-on-string CCL-PROGRAM STATUS STRING &optional CONTINUE UNIBY
     ASET (status, i, make_number (ccl.reg[i]));
   ASET (status, 8, make_number (ccl.ic));
 
-  if (NILP (unibyte_p))
-    val = make_multibyte_string ((char *) outbuf, produced_chars,
-                                outp - outbuf);
-  else
-    val = make_unibyte_string ((char *) outbuf, produced_chars);
+  val = make_specified_string ((const char *) outbuf, produced_chars,
+                              outp - outbuf, NILP (unibyte_p));
   xfree (outbuf);
 
   return val;