Mercurial > emacs
comparison lisp/bookmark.el @ 5307:069c54e77fd1
Don't repeat at load time any bindings that are autoloaded.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 23 Dec 1993 04:52:56 +0000 |
parents | c4bab885aa8d |
children | 1b76cf849b2f |
comparison
equal
deleted
inserted
replaced
5306:a2f8f9c4e29b | 5307:069c54e77fd1 |
---|---|
104 ;; assume that C-x r is a prefix map just because it's distributed | 104 ;; assume that C-x r is a prefix map just because it's distributed |
105 ;; that way... | 105 ;; that way... |
106 ;; These are the distribution keybindings suggested by RMS, everything | 106 ;; These are the distribution keybindings suggested by RMS, everything |
107 ;; else will be done with M-x or the menubar: | 107 ;; else will be done with M-x or the menubar: |
108 ;;;###autoload | 108 ;;;###autoload |
109 (if (symbolp (key-binding "\C-xr")) | 109 (if (or (symbolp (key-binding "\C-xr")) |
110 (fboundp 'bookmark-set)) | |
110 nil | 111 nil |
111 (progn (define-key ctl-x-map "rb" 'bookmark-jump) | 112 (progn (define-key ctl-x-map "rb" 'bookmark-jump) |
112 (define-key ctl-x-map "rm" 'bookmark-set) | 113 (define-key ctl-x-map "rm" 'bookmark-set) |
113 (define-key ctl-x-map "rl" 'list-bookmarks))) | 114 (define-key ctl-x-map "rl" 'list-bookmarks))) |
114 | 115 |