Mercurial > emacs
comparison lisp/bindings.el @ 18303:8d8d4aa12426
(mode-line-mule-info): Change style for showing
an activated input method.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 18 Jun 1997 12:55:15 +0000 |
| parents | 8c99057ec07a |
| children | 65986b1a2cd6 |
comparison
equal
deleted
inserted
replaced
| 18302:6fbbef4e6c39 | 18303:8d8d4aa12426 |
|---|---|
| 47 | 47 |
| 48 ;;; Code: | 48 ;;; Code: |
| 49 | 49 |
| 50 (defconst mode-line-mule-info | 50 (defconst mode-line-mule-info |
| 51 (purecopy '(enable-multibyte-characters | 51 (purecopy '(enable-multibyte-characters |
| 52 ((current-input-method ("[" current-input-method-title "]")) | 52 ((current-input-method ("" current-input-method-title ">")) |
| 53 "%z:"))) | 53 "%z:"))) |
| 54 "Mode-line control for displaying information of multilingual environment.") | 54 "Mode-line control for displaying information of multilingual environment. |
| 55 Normally it displays current input method (if any activated) and | |
| 56 mnemonics of the following coding systems: | |
| 57 coding system for saving or writing the current buffer | |
| 58 coding system for keyboard input (if Emacs is running on terminal) | |
| 59 coding system for terminal output (if Emacs is running on terminal) | |
| 60 coding system for decoding output of buffer process (if any) | |
| 61 coding system for encoding text to send to buffer process (if any).") | |
| 55 | 62 |
| 56 (make-variable-buffer-local 'mode-line-mule-info) | 63 (make-variable-buffer-local 'mode-line-mule-info) |
| 57 | 64 |
| 58 (defvar mode-line-buffer-identification (purecopy '("%12b")) | 65 (defvar mode-line-buffer-identification (purecopy '("%12b")) |
| 59 "Mode-line control for identifying the buffer being displayed. | 66 "Mode-line control for identifying the buffer being displayed. |