Merge from origin/emacs-25

[gnu-emacs] / lisp / gnus / gnus-start.el

diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el
index 34a5ff6cbac83d83077e7942395965c98a918baa..692c834613037840f216af03885b839baa5431d1 100644 (file)
--- a/lisp/gnus/gnus-start.el
+++ b/lisp/gnus/gnus-start.el
@@ -1675,10 +1675,10 @@ backend check whether the group actually exists."
              type-cache))
       ;; Only add groups that need updating.
       (if (or (and foreign-level (null (numberp foreign-level)))
-             (funcall (if one-level #'= #'<=) (gnus-info-level info)
-                      (if (eq (cadr method-group-list) 'foreign)
-                          foreign-level
-                        alevel)))
+          (funcall (if one-level #'= #'<=) (gnus-info-level info)
+                   (if (eq (cadr method-group-list) 'foreign)
+                       foreign-level
+                     alevel)))
          (setcar (nthcdr 2 method-group-list)
                  (cons info (nth 2 method-group-list)))
        ;; The group is inactive, so we nix out the number of unread articles.