Mercurial > emacs

changeset 53398:8aa355a609cd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(bookmark-get-bookmark): Use assoc-string.
author Richard M. Stallman <rms@gnu.org>
date Mon, 29 Dec 2003 19:04:08 +0000
parents 2843dc1a9a6f
children 9a9d11c249b9
files lisp/bookmark.el
diffstat 1 files changed, 1 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bookmark.el	Mon Dec 29 19:03:08 2003 +0000
+++ b/lisp/bookmark.el	Mon Dec 29 19:04:08 2003 +0000
@@ -335,10 +335,7 @@
   "Return the full entry for BOOKMARK in bookmark-alist.
 If BOOKMARK is not a string, return nil."
   (when (stringp bookmark)
-    (apply (if bookmark-completion-ignore-case
-	       #'assoc-ignore-case
-	     #'assoc)
-	   (list bookmark bookmark-alist))))
+    (assoc-string bookmark bookmark-alist bookmark-completion-ignore-case)))
 
 
 (defun bookmark-get-bookmark-record (bookmark)