Silence the byte compiler

[gnus] / lisp / auth-source.el

diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 103b66e..57e8c4c 100644 (file)
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -1521,11 +1521,11 @@ Respects `auth-source-save-behavior'.  Uses
 
 auth-source patterns can have values of the form :foo (\"bar\"
 \"qux\"), which means to match any secret with :foo equal to
-\"bar\" otr :foo equal to \"qux\".  The secrets backend supports
+\"bar\" or :foo equal to \"qux\".  The secrets backend supports
 only string values for patterns, so this routine returns a list
 of patterns that is equivalent to the single original pattern
 when interpreted such that if a secret matches any pattern in the
-list, it mathces the original pattern."
+list, it matches the original pattern."
   (if (null pattern)
       '(nil)
     (let* ((key (pop pattern))
@@ -1534,10 +1534,10 @@ list, it mathces the original pattern."
            (heads (if (stringp value)
                       (list (list key value))
                     (mapcar (lambda (v) (list key v)) value))))
-      (cl-loop
+      (loop
          for h in heads
          nconc
-           (cl-loop
+           (loop
               for tl in tails
               collect (append h tl))))))