Mercurial > emacs
changeset 18709:a82b89790f9c
Make global bindings only via loaddefs.el.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 10 Jul 1997 06:43:19 +0000 |
| parents | 965c5ee65d86 |
| children | e960f779eed3 |
| files | lisp/bookmark.el |
| diffstat | 1 files changed, 6 insertions(+), 12 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/bookmark.el Thu Jul 10 03:09:10 1997 +0000 +++ b/lisp/bookmark.el Thu Jul 10 06:43:19 1997 +0000 @@ -230,19 +230,13 @@ ;;; Keymap stuff: -;; some people have C-x r set to rmail or whatever. We don't want to -;; assume that C-x r is a prefix map just because it's distributed -;; that way... -;; These are the distribution keybindings suggested by RMS, everything -;; else will be done with M-x or the menubar: -;;;###autoload -(if (symbolp (key-binding "\C-xr")) - nil - (progn (define-key ctl-x-map "rb" 'bookmark-jump) - (define-key ctl-x-map "rm" 'bookmark-set) - (define-key ctl-x-map "rl" 'bookmark-bmenu-list))) + +;; Set up these bindings dumping time *only*; +;; if the user alters them, don't override the user when loading bookmark.el. -;; define the map, so it can be bound by those who desire to do so: +;;;###autoload (define-key ctl-x-map "rb" 'bookmark-jump) +;;;###autoload (define-key ctl-x-map "rm" 'bookmark-set) +;;;###autoload (define-key ctl-x-map "rl" 'bookmark-bmenu-list) ;;;###autoload (defvar bookmark-map nil