From 8e2faa74ce188da536a81cbece3b13f8f16f2bd6 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 25 Apr 2021 17:29:01 -0400 Subject: [PATCH] * lisp/url/url-proxy.el (url-find-proxy-for-url): Minor simplification --- lisp/url/url-proxy.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/url/url-proxy.el b/lisp/url/url-proxy.el index 1b3b1905e37..c89c1b6bc3e 100644 --- a/lisp/url/url-proxy.el +++ b/lisp/url/url-proxy.el @@ -49,9 +49,7 @@ ;; Not sure how I should handle gracefully degrading from one proxy to ;; another, so for now just deal with the first one ;; (while proxies - (if (listp proxies) - (setq proxy (car proxies)) - (setq proxy proxies)) + (setq proxy (if (listp proxies) (car proxies) proxies)) (cond ((string-match "^DIRECT" proxy) nil) ((string-match "^PROXY +" proxy) -- 2.39.5