diff options
| -rw-r--r-- | lisp/bookmark.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 247c418d872..0bddad34ada 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -161,7 +161,6 @@ instead, let the various bookmark functions do it for you.") | |||
| 161 | 161 | ||
| 162 | ;; just add the hook to make sure that people don't lose bookmarks | 162 | ;; just add the hook to make sure that people don't lose bookmarks |
| 163 | ;; when they kill Emacs, unless they don't want to save them. | 163 | ;; when they kill Emacs, unless they don't want to save them. |
| 164 | ;;;###autoload | ||
| 165 | (add-hook 'kill-emacs-hook | 164 | (add-hook 'kill-emacs-hook |
| 166 | (function | 165 | (function |
| 167 | (lambda () (and (featurep 'bookmark) | 166 | (lambda () (and (featurep 'bookmark) |
| @@ -1188,6 +1187,7 @@ and then move up one line" | |||
| 1188 | (cons menu-str menu))))) | 1187 | (cons menu-str menu))))) |
| 1189 | (if str (apply func-sym (list str))))) | 1188 | (if str (apply func-sym (list str))))) |
| 1190 | 1189 | ||
| 1190 | ;;;###autoload | ||
| 1191 | (defun bookmark-menu-bar-insert (event) | 1191 | (defun bookmark-menu-bar-insert (event) |
| 1192 | "Insert the text of the file pointed to by bookmark BOOKMARK. | 1192 | "Insert the text of the file pointed to by bookmark BOOKMARK. |
| 1193 | You may have a problem using this function if the value of variable | 1193 | You may have a problem using this function if the value of variable |
| @@ -1200,6 +1200,7 @@ this." | |||
| 1200 | "--- Insert Contents ---" | 1200 | "--- Insert Contents ---" |
| 1201 | event)) | 1201 | event)) |
| 1202 | 1202 | ||
| 1203 | ;;;###autoload | ||
| 1203 | (defun bookmark-menu-bar-jump (event) | 1204 | (defun bookmark-menu-bar-jump (event) |
| 1204 | "Jump to bookmark BOOKMARK (a point in some file). | 1205 | "Jump to bookmark BOOKMARK (a point in some file). |
| 1205 | You may have a problem using this function if the value of variable | 1206 | You may have a problem using this function if the value of variable |
| @@ -1212,6 +1213,7 @@ this." | |||
| 1212 | "--- Jump to Bookmark ---" | 1213 | "--- Jump to Bookmark ---" |
| 1213 | event)) | 1214 | event)) |
| 1214 | 1215 | ||
| 1216 | ;;;###autoload | ||
| 1215 | (defun bookmark-menu-bar-locate (event) | 1217 | (defun bookmark-menu-bar-locate (event) |
| 1216 | "Insert the name of the file associated with BOOKMARK. | 1218 | "Insert the name of the file associated with BOOKMARK. |
| 1217 | \(This is not the same as the contents of that file\)." | 1219 | \(This is not the same as the contents of that file\)." |
| @@ -1221,6 +1223,7 @@ this." | |||
| 1221 | "--- Insert Location ---" | 1223 | "--- Insert Location ---" |
| 1222 | event)) | 1224 | event)) |
| 1223 | 1225 | ||
| 1226 | ;;;###autoload | ||
| 1224 | (defun bookmark-menu-bar-rename (event) | 1227 | (defun bookmark-menu-bar-rename (event) |
| 1225 | "Change the name of OLD-BOOKMARK to NEWNAME. | 1228 | "Change the name of OLD-BOOKMARK to NEWNAME. |
| 1226 | If called from keyboard, prompts for OLD-BOOKMARK and NEWNAME. | 1229 | If called from keyboard, prompts for OLD-BOOKMARK and NEWNAME. |
| @@ -1239,6 +1242,7 @@ name, and C-v inserts the name of the file." | |||
| 1239 | "--- Rename Bookmark ---" | 1242 | "--- Rename Bookmark ---" |
| 1240 | event)) | 1243 | event)) |
| 1241 | 1244 | ||
| 1245 | ;;;###autoload | ||
| 1242 | (defun bookmark-menu-bar-delete (event) | 1246 | (defun bookmark-menu-bar-delete (event) |
| 1243 | "Delete the bookmark named NAME from the bookmark list. | 1247 | "Delete the bookmark named NAME from the bookmark list. |
| 1244 | Removes only the first instance of a bookmark with that name. If | 1248 | Removes only the first instance of a bookmark with that name. If |