From 0f50e5163cf747fcf18124039a82b5156a48316b Mon Sep 17 00:00:00 2001 From: Karl Fogel Date: Mon, 9 Nov 2015 22:14:49 -0600 Subject: [PATCH] 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). --- lisp/bookmark.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/bookmark.el b/lisp/bookmark.el index e3b1dc4ebd3..0729bdd2d44 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -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. -- 2.39.5