changeset 84910:90defdcad2cb

(describe-current-coding-system): Use `mapc' rather than `mapcar'.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 26 Sep 2007 00:19:29 +0000
parents 696d13905618
children 1ffa59f288ec
files lisp/international/mule-diag.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-diag.el	Wed Sep 26 00:18:58 2007 +0000
+++ b/lisp/international/mule-diag.el	Wed Sep 26 00:19:29 2007 +0000
@@ -839,7 +839,7 @@
 	    coding-system codings)
 	(while categories
 	  (setq coding-system (symbol-value (car categories)))
-	  (mapcar
+	  (mapc
 	   (lambda (x)
 	     (if (and (not (eq x coding-system))
 		      (coding-system-get x 'no-initial-designation)