remove some LF/CR

This commit is contained in:
mischa 2022-08-22 18:51:26 +00:00
parent d056a32d57
commit 42282c8da7

View File

@ -112,22 +112,17 @@ while (my $line = <>) {
dolog($fh, "$sid to: $email, from: $from", $opt_l);
$selvacation->bind_param(1, $email);
$selvacation->execute;
if ($selvacation->rows == 1) {
dolog($fh, "$sid found OOO for $email", $opt_l);
my @vacation_msg = $selvacation->fetchrow_array;
$selcache->bind_param(1, $email);
$selcache->bind_param(2, $from);
$selcache->execute;
if ($selcache->rows == 0) {
dolog($fh, "$sid sending OOO to $from", $opt_l);
$upcache->bind_param(1, $from);
$upcache->bind_param(2, $email);
$upcache->execute;
open my $fh_email, "|-", "/usr/sbin/sendmail -t";
print $fh_email "From: $email\n";
print $fh_email "To: $from\n";;