diff options
author | Juri Linkov <juri@jurta.org> | 2004-05-01 03:50:24 +0000 |
---|---|---|
committer | Juri Linkov <juri@jurta.org> | 2004-05-01 03:50:24 +0000 |
commit | 486add9d38b9862445be50158b324f2cc45672c5 (patch) | |
tree | 83c481416a6c5e9a48d71e24522b36cd418fc70e /lisp | |
parent | 52f134eea75b45425febcb0f95d51f0a5e12ebb2 (diff) | |
download | emacs-486add9d38b9862445be50158b324f2cc45672c5.tar.gz |
(propertized-buffer-identification):
Replace `(:weight bold)' by `Buffer-menu-buffer-face'.
Add C-M-arrow keys for consistency.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/bindings.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index 1f86f3b6fcb..e1a2739d759 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -460,7 +460,7 @@ Menu of mode operations in the mode line.") FMT is a format specifier such as \"%12b\". This function adds text properties for face, help-echo, and local-map to it." (list (propertize fmt - 'face '(:weight bold) + 'face 'Buffer-menu-buffer-face 'help-echo (purecopy "mouse-1: previous buffer, mouse-3: next buffer") 'local-map mode-line-buffer-identification-keymap))) @@ -945,6 +945,13 @@ language you are using." ;; This is "move to the clipboard", or as close as we come. (global-set-key [S-delete] 'kill-region) +(global-set-key [C-M-left] 'backward-sexp) +(global-set-key [C-M-right] 'forward-sexp) +(global-set-key [C-M-up] 'backward-up-list) +(global-set-key [C-M-down] 'down-list) +(global-set-key [C-M-home] 'beginning-of-defun) +(global-set-key [C-M-end] 'end-of-defun) + (define-key esc-map "\C-f" 'forward-sexp) (define-key esc-map "\C-b" 'backward-sexp) (define-key esc-map "\C-u" 'backward-up-list) |