* international/mule-diag.el (print-list): Fix 2008-12-03 change.

ecbe9da5 · Juanma Barranquero · 60898913 · ecbe9da5 · ecbe9da5
Commit ecbe9da5 authored Jan 14, 2009 by Juanma Barranquero
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletion

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/international/mule-diag.el lisp/international/mule-diag.el +1 -1

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2009-01-14  Juanma Barranquero  <lekktu@gmail.com>
+
+	* international/mule-diag.el (print-list): Fix 2008-12-03 change.
+
 2009-01-14  Martin Rudalics  <rudalics@gmx.at>
  
 	* frame.el (special-display-popup-frame): Rewrite doc-string and

--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -38,7 +38,7 @@

 (defun print-list (&rest args)
  "Print all arguments with single space separator in one line."
-  (princ (mapconcat #'identity args " "))
+  (princ (mapconcat (lambda (arg) (prin1-to-string arg t)) args " "))
  (princ "\n"))

 ;;; CHARSET