(nnimap-split-find-rule): Fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 82c2676..8e5fbb0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,7 @@
        * nnimap.el (nnimap-open-connection): Don't look up virtual server
        name in authinfo (.authinfo now support ports, no need for the
        hack).
+       (nnimap-split-find-rule): Fix.
 
 2000-07-03  Paul Stodghill <stodghil@CS.Cornell.EDU>
 

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 8812e82..d02ccf4 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -922,7 +922,9 @@ function is generally only called when Gnus is shutting down."
     element))
 
 (defun nnimap-split-find-rule (server inbox)
-  (if (listp (cadar nnimap-split-rule)) ;; extended format?
+  (if (and (listp nnimap-split-rule) (listp (car nnimap-split-rule))
+           (list (cdar nnimap-split-rule)) (listp (cadar nnimap-split-rule)))
+      ;; extended format
       (cadr (nnimap-assoc-match inbox (cdr (nnimap-assoc-match 
                                            server nnimap-split-rule))))
     nnimap-split-rule))