procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(bookmark-get-bookmark): Use assoc-string.

Browse source
This commit is contained in:
Richard M. Stallman 2003-12-29 19:04:08 +00:00
parent 52f2cda2f4
commit d09596261d
1 changed files with 1 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/bookmark.el
View file

@ -335,10 +335,7 @@ through a file easier.")
"Return the full entry for BOOKMARK in bookmark-alist. "Return the full entry for BOOKMARK in bookmark-alist.
If BOOKMARK is not a string, return nil." If BOOKMARK is not a string, return nil."
(when (stringp bookmark) (when (stringp bookmark)
(apply (if bookmark-completion-ignore-case (assoc-string bookmark bookmark-alist bookmark-completion-ignore-case)))
#'assoc-ignore-case
#'assoc)
(list bookmark bookmark-alist))))
(defun bookmark-get-bookmark-record (bookmark) (defun bookmark-get-bookmark-record (bookmark)