Mercurial > emacs
comparison lisp/bookmark.el @ 4634:cd8eef9ec0c4
(bookmark-alist): Move defvar before first use.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 14 Aug 1993 19:52:32 +0000 |
| parents | 738840d8e627 |
| children | 511c83aee4ae |
comparison
equal
deleted
inserted
replaced
| 4633:738840d8e627 | 4634:cd8eef9ec0c4 |
|---|---|
| 104 (define-key bookmark-map "l" 'bookmark-load) | 104 (define-key bookmark-map "l" 'bookmark-load) |
| 105 ;; saves them in file | 105 ;; saves them in file |
| 106 (define-key bookmark-map "w" 'bookmark-write) | 106 (define-key bookmark-map "w" 'bookmark-write) |
| 107 (define-key bookmark-map "s" 'bookmark-save) | 107 (define-key bookmark-map "s" 'bookmark-save) |
| 108 | 108 |
| 109 (defvar bookmark-alist () | |
| 110 "Association list of bookmarks. | |
| 111 You probably don't want to change the value of this alist yourself; | |
| 112 instead, let the various bookmark functions do it for you.") | |
| 113 | |
| 109 ;; just add the hook to make sure that people don't lose bookmarks | 114 ;; just add the hook to make sure that people don't lose bookmarks |
| 110 ;; when they kill Emacs, unless they don't want to save them. | 115 ;; when they kill Emacs, unless they don't want to save them. |
| 111 | 116 |
| 112 (add-hook 'kill-emacs-hook | 117 (add-hook 'kill-emacs-hook |
| 113 (function | 118 (function |
| 152 (defvar bookmark-completion-ignore-case t | 157 (defvar bookmark-completion-ignore-case t |
| 153 "*Non-nil means bookmark functions ignore case in completion.") | 158 "*Non-nil means bookmark functions ignore case in completion.") |
| 154 | 159 |
| 155 (defvar bookmark-search-size 500 | 160 (defvar bookmark-search-size 500 |
| 156 "Length of the context strings recorded on either side of a bookmark.") | 161 "Length of the context strings recorded on either side of a bookmark.") |
| 157 | |
| 158 (defvar bookmark-alist () | |
| 159 "Association list of bookmarks. | |
| 160 You probably don't want to change the value of this alist yourself; | |
| 161 instead, let the various bookmark functions do it for you.") | |
| 162 | 162 |
| 163 (defvar bookmark-current-point 0) | 163 (defvar bookmark-current-point 0) |
| 164 (defvar bookmark-yank-point 0) | 164 (defvar bookmark-yank-point 0) |
| 165 (defvar bookmark-current-buffer nil) | 165 (defvar bookmark-current-buffer nil) |
| 166 | 166 |