Mercurial > emacs
comparison lisp/international/mule-diag.el @ 88705:80a9a0f0e995
(describe-current-coding-system):
Add selection-coding-system.
author | Dave Love <fx@gnu.org> |
---|---|
date | Fri, 31 May 2002 22:26:10 +0000 |
parents | c68f88e42678 |
children | 9ae3a7ed0b93 |
comparison
equal
deleted
inserted
replaced
88704:d203bf79d292 | 88705:80a9a0f0e995 |
---|---|
708 (print-coding-system-briefly default-buffer-file-coding-system) | 708 (print-coding-system-briefly default-buffer-file-coding-system) |
709 (princ "Coding system for keyboard input:\n ") | 709 (princ "Coding system for keyboard input:\n ") |
710 (print-coding-system-briefly (keyboard-coding-system)) | 710 (print-coding-system-briefly (keyboard-coding-system)) |
711 (princ "Coding system for terminal output:\n ") | 711 (princ "Coding system for terminal output:\n ") |
712 (print-coding-system-briefly (terminal-coding-system)) | 712 (print-coding-system-briefly (terminal-coding-system)) |
713 (princ "Coding system for inter-client cut and paste:\n ") | |
714 (print-coding-system-briefly selection-coding-system) | |
713 (when (get-buffer-process (current-buffer)) | 715 (when (get-buffer-process (current-buffer)) |
714 (princ "Coding systems for process I/O:\n") | 716 (princ "Coding systems for process I/O:\n") |
715 (princ " encoding input to the process: ") | 717 (princ " encoding input to the process: ") |
716 (print-coding-system-briefly (cdr process-coding-systems)) | 718 (print-coding-system-briefly (cdr process-coding-systems)) |
717 (princ " decoding output from the process: ") | 719 (princ " decoding output from the process: ") |