typo

diff --git a/imapsync b/imapsync
index 8bff4471ce3ff7ee034d71dcbea9425cf65d2f17..498fb820d477eb8a51f3098013f33654b239876f 100755 (executable)
--- a/imapsync
+++ b/imapsync
@@ -409,12 +409,12 @@ my @MAILBOXES;
     my $sth_subscribe = $DBH->prepare(q{UPDATE mailboxes SET subscribed = ? WHERE idx = ?});
 
     foreach my $mailbox (keys %mailboxes) {
-        next if defined $CONF->{_}->{'ignore-mailbox'} and $mailbox !~ /$CONF->{_}->{'ignore-mailbox'}/o;
+        next if defined $CONF->{_}->{'ignore-mailbox'} and $mailbox =~ /$CONF->{_}->{'ignore-mailbox'}/o;
         my ($lExists, $rExists) = map {mbx_exists($_,$mailbox)} qw/local remote/;
         next unless $lExists or $rExists;
 
         check_delim($mailbox); # ensure that the delimiter match
-        push $mailbox, @MAILBOXES;
+        push @MAILBOXES, $mailbox;
 
         $STH_GET_INDEX->execute($mailbox);
         my ($idx,$subscribed) = $STH_GET_INDEX->fetchrow_array();