Fix some recently-perturbed bookmark autoloads
* lisp/bookmark.el (bookmark-set-internal): Remove unnecessary autoload.
(bookmark-set): Restore autoload.
(bookmark-set-no-overwrite): Add autoload.
Thanks to Juanma Barranquero for noticing the autoload problems
introduced by my recent commit adding/changing the above functions
(Sun Nov 8 14:16:43 2015 -0500, git commit 3812e17978
).
This commit is contained in:
parent
f5eac7baef
commit
0f50e5163c
1 changed files with 2 additions and 1 deletions
|
@ -756,7 +756,6 @@ This expects to be called from `point-min' in a bookmark file."
|
|||
(define-key map "\C-w" 'bookmark-yank-word)
|
||||
map))
|
||||
|
||||
;;;###autoload
|
||||
(defun bookmark-set-internal (prompt name overwrite-or-push)
|
||||
"Interactively set a bookmark named NAME at the current location.
|
||||
|
||||
|
@ -824,6 +823,7 @@ is ever deleted."
|
|||
(setq bookmark-current-buffer nil)))
|
||||
|
||||
|
||||
;;;###autoload
|
||||
(defun bookmark-set (&optional name no-overwrite)
|
||||
"Set a bookmark named NAME at the current location.
|
||||
If NAME is nil, then prompt the user.
|
||||
|
@ -853,6 +853,7 @@ the list of bookmarks.)"
|
|||
(if no-overwrite "Set bookmark" "Set bookmark unconditionally")))
|
||||
(bookmark-set-internal prompt name (if no-overwrite 'push 'overwrite))))
|
||||
|
||||
;;;###autoload
|
||||
(defun bookmark-set-no-overwrite (&optional name push-bookmark)
|
||||
"Set a bookmark named NAME at the current location.
|
||||
If NAME is nil, then prompt the user.
|
||||
|
|
Loading…
Add table
Reference in a new issue