From: Kenichi Handa <handa@m17n.org>
Date: Sat, 16 Jun 2007 02:16:18 +0000 (+0000)
Subject: (select-safe-coding-system-interactively): Fix printing of
X-Git-Tag: emacs-pretest-23.0.90~8295^2~412
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=46c0471835d2f73670a847df0b86fd0e5c3ff5da;p=emacs.git

(select-safe-coding-system-interactively): Fix printing of
rejected and unsafe coding-systems.
---

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 702fab36d2b..5ffd0174b7b 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -715,7 +715,7 @@ DEFAULT is the coding system to use by default in the query."
 	    (let ((pos (point))
 		  (fill-prefix "  "))
 	      (dolist (x (append rejected unsafe))
-		(princ "  ") (princ (car x)))
+		(princ "  ") (princ x))
 	      (insert "\n")
 	      (fill-region-as-paragraph pos (point)))
 	    (when rejected