diff lisp/international/mule-cmds.el @ 49598:0d8b17d428b5

Trailing whitepace deleted.

--- a/lisp/international/mule-cmds.el	Tue Feb 04 12:29:42 2003 +0000
+++ b/lisp/international/mule-cmds.el	Tue Feb 04 13:24:35 2003 +0000
@@ -285,7 +285,7 @@
 
     (when (eq cmd 'universal-argument)
       (call-interactively cmd)
-      
+
       ;; Process keys bound in `universal-argument-map'.
       (while (progn
 	       (setq keyseq (read-key-sequence nil t)
@@ -302,7 +302,7 @@
       ;; set's the final `prefix-arg.
       (let ((current-prefix-arg prefix-arg))
 	(call-interactively cmd))
-	
+
       ;; Read the command to execute with the given prefix arg.
       (setq prefix prefix-arg
 	    keyseq (read-key-sequence nil t)
@@ -719,7 +719,7 @@
 					       0 (length from) coding
 					       11 from))))
 			    unsafe))
-	    (setq unsafe 
+	    (setq unsafe
 		  (mapcar #'(lambda (coding)
 			      (cons coding
 				    (mapcar #'(lambda (pos)
@@ -788,7 +788,7 @@
 		  (mapc #'(lambda (x) (princ " ") (princ x)) rejected)
 		  (insert "\n"))
 		(when unsafe
-		  (insert (if rejected "And the others" 
+		  (insert (if rejected "And the others"
 			    "However, each of them")
 			  " encountered these problematic characters:\n")
 		  (mapc
@@ -853,7 +853,7 @@
 	  ;; Read a coding system.
 	  (setq default-coding-system (or (car safe) (car codings)))
 	  (setq coding-system
-		(read-coding-system 
+		(read-coding-system
 		 (format "Select coding system (default %s): "
 			 default-coding-system)
 		 default-coding-system))
@@ -2162,7 +2162,7 @@
 See also `locale-charset-language-names', `locale-language-names',
 `locale-preferred-coding-systems' and `locale-coding-system'."
   (interactive "sSet environment for locale: ")
- 
+
   ;; Do this at runtime for the sake of binaries possibly transported
   ;; to a system without X.
   (setq locale-translation-file-name