diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2008-11-21 10:32:39 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2008-11-21 10:32:39 +0000 |
commit | 0f219a97ca8cb0b8e2c85324e90c001f34c57359 (patch) | |
tree | 88afe424d20626376f0183d0d4ecbeaaab7f673b /lisp/bookmark.el | |
parent | 6a4cfb0c8f7899643a4adc2c5b4a2c2ba802f950 (diff) | |
download | emacs-0f219a97ca8cb0b8e2c85324e90c001f34c57359.tar.gz |
* bookmark.el (bookmark-jump-noselect): Add obsolescence declaration
and remove redundant info from docstring.
Diffstat (limited to 'lisp/bookmark.el')
-rw-r--r-- | lisp/bookmark.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 658097c8bf0..8a48cf3e18b 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -750,7 +750,7 @@ the list of bookmarks.\)" nil nil default)))) (and (string-equal str "") (setq str default)) (bookmark-store str (cdr record) parg) - + ;; Ask for an annotation buffer for this bookmark (if bookmark-use-annotations (bookmark-edit-annotation str) @@ -947,7 +947,7 @@ Useful for example to unhide text in `outline-mode'.") ;; if there is an annotation for this bookmark, ;; show it in a buffer. (bookmark-show-annotation bookmark))) - + ;;;###autoload (defun bookmark-jump (bookmark) @@ -1009,11 +1009,13 @@ be retrieved from a VC backend, else return nil." The return value has the form (BUFFER . POINT). Note: this function is deprecated and is present for Emacs 22 -compatibility only. Use `bookmark-handle-bookmark' instead." +compatibility only." (save-excursion (bookmark-handle-bookmark bookmark) (cons (current-buffer) (point)))) +(make-obsolete 'bookmark-jump-noselect 'bookmark-handle-bookmark "23.1") + (defun bookmark-handle-bookmark (bookmark) "Call BOOKMARK's handler or `bookmark-default-handler' if it has none. Changes current buffer and point and returns nil, or signals a `file-error'. |