From 0f219a97ca8cb0b8e2c85324e90c001f34c57359 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 21 Nov 2008 10:32:39 +0000 Subject: [PATCH] * bookmark.el (bookmark-jump-noselect): Add obsolescence declaration and remove redundant info from docstring. --- lisp/ChangeLog | 3 +++ lisp/bookmark.el | 8 +++++--- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5c053175ee0..62417c7aacc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2008-11-21 Juanma Barranquero + * bookmark.el (bookmark-jump-noselect): Add obsolescence declaration + and remove redundant info from docstring. + * isearch.el (isearch-search-string): Doc fix. (search-exit-option, search-slow-window-lines, search-slow-speed) (search-upper-case, search-nonincremental-instead) 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'. -- 2.11.4.GIT