move OOO done to proper place
This commit is contained in:
parent
34f6ad5cfa
commit
a8c886e17e
|
@ -125,17 +125,16 @@ while (my $line = <>) {
|
||||||
print $fh_email "Content-Type: text/plain; charset=utf-8\n\n";
|
print $fh_email "Content-Type: text/plain; charset=utf-8\n\n";
|
||||||
print $fh_email "$vacation_msg[1]\n";
|
print $fh_email "$vacation_msg[1]\n";
|
||||||
close $fh_email;
|
close $fh_email;
|
||||||
|
delete $ooo{$sid};
|
||||||
|
dolog($fh, "$sid removed session - OOO done", $opt_l);
|
||||||
} else {
|
} else {
|
||||||
delete $ooo{$sid};
|
delete $ooo{$sid};
|
||||||
dolog($fh, "$sid removed session - cache hit", $opt_l);
|
dolog($fh, "$sid removed session - OOO cache hit", $opt_l);
|
||||||
}
|
}
|
||||||
delete $ooo{$sid};
|
|
||||||
dolog($fh, "$sid removed session - OOO done", $opt_l);
|
|
||||||
} else {
|
} else {
|
||||||
delete $ooo{$sid};
|
delete $ooo{$sid};
|
||||||
dolog($fh, "$sid removed session - OOO not found for $email", $opt_l);
|
dolog($fh, "$sid removed session - OOO not found for $email", $opt_l);
|
||||||
}
|
}
|
||||||
|
|
||||||
} elsif ($line =~ m/data-line/ && $data eq '.' && $ooo{$sid} == 0) {
|
} elsif ($line =~ m/data-line/ && $data eq '.' && $ooo{$sid} == 0) {
|
||||||
delete $ooo{$sid};
|
delete $ooo{$sid};
|
||||||
dolog($fh, "$sid removed session - OOO skip", $opt_l);
|
dolog($fh, "$sid removed session - OOO skip", $opt_l);
|
||||||
|
|
Loading…
Reference in New Issue