From 7e66aa48c48d759cf4cc37ed2f761b780da90699 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 28 Apr 2017 08:21:39 -0400 Subject: [PATCH] * lisp/auth-source.el (auth-source-backend-parse): `return' -> cl-return. --- lisp/auth-source.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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 -- 2.39.5