Mercurial > emacs
changeset 21361:f270e8ad8276
(webjump): Use assoc-ignore-case for locating the proper URL.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 05 Apr 1998 03:19:59 +0000 |
parents | 238c1cd70a27 |
children | a45af443a262 |
files | lisp/webjump.el |
diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/webjump.el Sun Apr 05 01:05:15 1998 +0000 +++ b/lisp/webjump.el Sun Apr 05 03:19:59 1998 +0000 @@ -274,8 +274,9 @@ <nwv@acm.org>." (interactive) (let* ((completion-ignore-case t) - (item (assoc (completing-read "WebJump to site: " webjump-sites nil t) - webjump-sites)) + (item (assoc-ignore-case + (completing-read "WebJump to site: " webjump-sites nil t) + webjump-sites)) (name (car item)) (expr (cdr item))) (funcall browse-url-browser-function