Mercurial > emacs
changeset 101170:6df4439cd595
* international/mule-diag.el (print-list): Fix 2008-12-03 change.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 14 Jan 2009 12:06:34 +0000 |
| parents | 39077981fbed |
| children | a94440e70b7c |
| files | lisp/ChangeLog lisp/international/mule-diag.el |
| diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Jan 14 10:14:40 2009 +0000 +++ b/lisp/ChangeLog Wed Jan 14 12:06:34 2009 +0000 @@ -1,3 +1,7 @@ +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 Wed Jan 14 10:14:40 2009 +0000 +++ b/lisp/international/mule-diag.el Wed Jan 14 12:06:34 2009 +0000 @@ -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