From af2c603886a5116df90f36a5f2ca4b953132c83a Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 6 May 2005 19:26:33 +0000 Subject: [PATCH] (webjump): Replace `assoc-ignore-case' by `assoc-string'. --- lisp/net/webjump.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/net/webjump.el b/lisp/net/webjump.el index 3f004b8864e..0fc47fafa85 100644 --- a/lisp/net/webjump.el +++ b/lisp/net/webjump.el @@ -274,9 +274,9 @@ Please submit bug reports and other feedback to the author, Neil W. Van Dyke ." (interactive) (let* ((completion-ignore-case t) - (item (assoc-ignore-case + (item (assoc-string (completing-read "WebJump to site: " webjump-sites nil t) - webjump-sites)) + webjump-sites t)) (name (car item)) (expr (cdr item))) (browse-url (webjump-url-fix -- 2.39.2