Function: universal-coding-system-argument

universal-coding-system-argument is an interactive and byte-compiled function defined in mule-cmds.el.gz.

Signature

(universal-coding-system-argument CODING-SYSTEM)

Documentation

Execute an I/O command using the specified CODING-SYSTEM.

View in manual

Probably introduced at or before Emacs version 20.1.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/international/mule-cmds.el.gz
(defun universal-coding-system-argument (coding-system)
  "Execute an I/O command using the specified CODING-SYSTEM."
  (interactive
   (let ((default (and buffer-file-coding-system
		       (not (eq (coding-system-type buffer-file-coding-system)
				'undecided))
		       buffer-file-coding-system)))
     (list (read-coding-system
            (format-prompt "Coding system for following command" default)
	    default))))
  (prefix-command-preserve-state)
  (setq mule-cmds--prefixed-command-next-coding-system coding-system)
  (add-hook 'pre-command-hook #'mule-cmds--prefixed-command-pch)
  (add-hook 'prefix-command-echo-keystrokes-functions
            #'mule-cmds--prefixed-command-echo)
  (add-hook 'prefix-command-preserve-state-hook
            #'mule-cmds--prefixed-command-preserve))