Synch with Oort Gnus.
[elisp/gnus.git-] / lisp / nnwfm.el
index 29cf92d..2de45b7 100644 (file)
                  (push (list from time bstuff) contents))))
            (setq contents (nreverse contents))
            (dolist (art (cdr elem))
-               (push (list (car art)
-                           (nth (1- (cdr art)) contents)
-                           subject)
-                     nnwfm-articles))))
+             (push (list (car art)
+                         (nth (1- (cdr art)) contents)
+                         subject)
+                   nnwfm-articles))))
        (setq nnwfm-articles
              (sort nnwfm-articles 'car-less-than-car))
        ;; Now we have all the articles, conveniently in an alist
   (unless nnwfm-groups-alist
     (nnwfm-read-groups)
     (setq nnwfm-groups (cdr (assoc nnwfm-address
-                                       nnwfm-groups-alist)))))
+                                  nnwfm-groups-alist)))))
 
 (deffoo nnwfm-open-server (server &optional defs connectionless)
   (nnheader-init-server-buffer)