Commit 7e66aa48 authored by Stefan Monnier's avatar Stefan Monnier

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

parent 6a151cf8
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment