summaryrefslogtreecommitdiff
path: root/lisp/bindings.el
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2004-05-01 03:50:24 +0000
committerJuri Linkov <juri@jurta.org>2004-05-01 03:50:24 +0000
commit486add9d38b9862445be50158b324f2cc45672c5 (patch)
tree83c481416a6c5e9a48d71e24522b36cd418fc70e /lisp/bindings.el
parent52f134eea75b45425febcb0f95d51f0a5e12ebb2 (diff)
downloademacs-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/bindings.el')
-rw-r--r--lisp/bindings.el9
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)