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 |