wir müssen angemeldet sein damit uns der imap server verrät ob er acl unterstützt oder nicht foerste
authorMatthias Förste foerste@schlittermann.de
Mon, 28 Nov 2011 14:58:49 +0100
branchfoerste
changeset 49 0277d8ad4d9d
parent 48 36aca6fb0ab8
child 50 aca7592c284b
wir müssen angemeldet sein damit uns der imap server verrät ob er acl unterstützt oder nicht
account.pm
--- a/account.pm	Mon Nov 28 09:49:28 2011 +0100
+++ b/account.pm	Mon Nov 28 14:58:49 2011 +0100
@@ -187,9 +187,7 @@
 
             verbose('exists')
 
-        } elsif ( $imap->capability->{acl} ) {
-
-            $imap->login( $user, $pw ) or die $@;
+        } elsif ( ($imap->login( $user, $pw ) or die $@) and $imap->capability->{acl} ) {
 
             # wenn wir acl verwenden,
             #  * dann triggert 'list' acl file (und damit maildir) erzeugung