]> code.delx.au - gnu-emacs/blobdiff - lisp/bookmark.el
Update copyright year to 2016
[gnu-emacs] / lisp / bookmark.el
index e3b1dc4ebd3062aa8df1ea9395d56e93376df2b5..c2f8cc3fbc19fdb794714eb302507b870a4bf513 100644 (file)
@@ -1,6 +1,6 @@
 ;;; bookmark.el --- set bookmarks, maybe annotate them, jump to them later
 
-;; Copyright (C) 1993-1997, 2001-2015 Free Software Foundation, Inc.
+;; Copyright (C) 1993-1997, 2001-2016 Free Software Foundation, Inc.
 
 ;; Author: Karl Fogel <kfogel@red-bean.com>
 ;; Maintainer: Karl Fogel <kfogel@red-bean.com>
@@ -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.