diff options
| author | Kenichi Handa <handa@m17n.org> | 2002-12-17 11:56:26 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2002-12-17 11:56:26 +0000 |
| commit | 2308d0d7e0c5fb0bb9fa8f110a11738e49e9479f (patch) | |
| tree | 0f2cb10935cb3dcc92639aeb5b078ffcf681b507 | |
| parent | 0e9ec6091e747af74434ce8109630544ef80effb (diff) | |
| download | emacs-2308d0d7e0c5fb0bb9fa8f110a11738e49e9479f.tar.gz emacs-2308d0d7e0c5fb0bb9fa8f110a11738e49e9479f.tar.bz2 emacs-2308d0d7e0c5fb0bb9fa8f110a11738e49e9479f.zip | |
(mule-keymap, set-coding-system-map):
Add bindings for set-file-name-coding-system.
| -rw-r--r-- | lisp/international/mule-cmds.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index fa0520a2f27..04269014ca0 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -39,6 +39,7 @@ (define-key mule-keymap "f" 'set-buffer-file-coding-system) (define-key mule-keymap "r" 'revert-buffer-with-coding-system) +(define-key mule-keymap "F" 'set-file-name-coding-system) (define-key mule-keymap "t" 'set-terminal-coding-system) (define-key mule-keymap "k" 'set-keyboard-coding-system) (define-key mule-keymap "p" 'set-buffer-process-coding-system) @@ -130,6 +131,10 @@ :enable buffer-file-name :help "Revisit this file immediately using specified coding system") t) +(define-key-after set-coding-system-map [set-file-name-coding-system] + '(menu-item "For File Name" set-file-name-coding-system + :help "How to decode/encode file names") + t) (define-key-after set-coding-system-map [separator-2] '("--") t) |