(get-charset-property): If CHARSET is

[bpt/emacs.git] / lisp / webjump.el

diff --git a/lisp/webjump.el b/lisp/webjump.el
index 3273a5b..42d0a4d 100644 (file)
--- a/lisp/webjump.el
+++ b/lisp/webjump.el
@@ -274,8 +274,9 @@ Please submit bug reports and other feedback to the author, Neil W. Van Dyke
 <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