Mercurial > emacs

changeset 91797:5ed3a8ae2d11

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(byte-compile-lapcode): Use unibyte-string instead of string-make-unibyte.
author Kenichi Handa <handa@m17n.org>
date Tue, 12 Feb 2008 11:21:31 +0000
parents 132b386a2c8b
children 8f14fd050028
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Tue Feb 12 07:13:29 2008 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Tue Feb 12 11:21:31 2008 +0000
@@ -864,7 +864,7 @@
 	       (setcar (cdr bytes) (logand pc 255))
 	       (setcar bytes (lsh pc -8))))
 	(setq patchlist (cdr patchlist))))
-    (string-make-unibyte (concat (nreverse bytes)))))
+    (apply 'unibyte-string (nreverse bytes))))
 
 
 ;;; compile-time evaluation