From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 28 Apr 2017 12:21:39 +0000 (-0400)
Subject: * lisp/auth-source.el (auth-source-backend-parse): `return' -> cl-return.
X-Git-Tag: emacs-26.0.90~521^2~521
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7e66aa48c48d759cf4cc37ed2f761b780da90699;p=emacs.git

* lisp/auth-source.el (auth-source-backend-parse): `return' -> cl-return.
---

diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 3b60bd88d55..01d12c26141 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -364,9 +364,9 @@ soon as a function returns non-nil.")
   "Create an auth-source-backend from an ENTRY in `auth-sources'."
 
   (let (backend)
-    (dolist (f auth-source-backend-parser-functions)
+    (cl-dolist (f auth-source-backend-parser-functions)
       (when (setq backend (funcall f entry))
-        (return)))
+        (cl-return)))
 
     (unless backend
       ;; none of the parsers worked