Mercurial > emacs
changeset 55275:1fcfb5d038a2
(propertized-buffer-identification):
Replace `(:weight bold)' by `Buffer-menu-buffer-face'.
Add C-M-arrow keys for consistency.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Sat, 01 May 2004 03:50:24 +0000 |
| parents | 33be1cf542ec |
| children | bb40821b1901 |
| files | lisp/bindings.el |
| diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/bindings.el Sat May 01 03:47:42 2004 +0000 +++ b/lisp/bindings.el Sat May 01 03:50:24 2004 +0000 @@ -460,7 +460,7 @@ 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 @@ ;; 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)