summaryrefslogtreecommitdiff
path: root/lisp/bookmark.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2003-12-29 19:04:08 +0000
committerRichard M. Stallman <rms@gnu.org>2003-12-29 19:04:08 +0000
commitd09596261d476518b62c603e40b198dbaed71d6f (patch)
tree7fe178cdb3412c5259f2ef6f01ad8d0ee477d627 /lisp/bookmark.el
parent52f2cda2f4285d82a7b3dd366ad43a01509903ab (diff)
downloademacs-d09596261d476518b62c603e40b198dbaed71d6f.tar.gz
(bookmark-get-bookmark): Use assoc-string.
Diffstat (limited to 'lisp/bookmark.el')
-rw-r--r--lisp/bookmark.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el
index 762de7323a2..67ae2c84865 100644
--- a/lisp/bookmark.el
+++ b/lisp/bookmark.el
@@ -335,10 +335,7 @@ through a file easier.")
"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)