# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 873615094 0
# Node ID 054497f709326daba1ef570fe69259af70751134
# Parent  646589bc370b5f15f549c452efeec411fefb7893
(universal-coding-system-argument): Improve prompt strings.

diff -r 646589bc370b -r 054497f70932 lisp/international/mule-cmds.el
--- a/lisp/international/mule-cmds.el	Sun Sep 07 06:17:29 1997 +0000
+++ b/lisp/international/mule-cmds.el	Sun Sep 07 06:51:34 1997 +0000
@@ -168,9 +168,9 @@
 (defun universal-coding-system-argument ()
   "Execute an I/O command using the specified coding system."
   (interactive)
-  (let* ((coding-system (read-coding-system "Coding system: "))
+  (let* ((coding-system (read-coding-system "Coding system for following command: "))
 	 (keyseq (read-key-sequence
-		  (format "With coding system %s:" coding-system)))
+		  (format "Command to execute with %s:" coding-system)))
 	 (cmd (key-binding keyseq)))
     (let ((coding-system-for-read coding-system)
 	  (coding-system-for-write coding-system))