From: Richard M. Stallman Date: Sun, 7 Sep 1997 06:51:34 +0000 (+0000) Subject: (universal-coding-system-argument): Improve prompt strings. X-Git-Tag: emacs-20.1~150 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e14a8f4c5977edc3cd9f4168f5c7f81abf3da3d2;p=emacs.git (universal-coding-system-argument): Improve prompt strings. --- diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index d59db76a47d..1c415ed1edf 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -168,9 +168,9 @@ With arg, make them enable iff arg is positive." (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))