16 lines
855 B
Diff
16 lines
855 B
Diff
|
diff -Nur -x '*.orig' -x '*.rej' qpsmtpd-0.96/lib/Qpsmtpd/TcpServer.pm mezzanine_patched_qpsmtpd-0.96/lib/Qpsmtpd/TcpServer.pm
|
||
|
|
--- qpsmtpd-0.96/lib/Qpsmtpd/TcpServer.pm 2016-02-16 23:52:02.000000000 +0100
|
||
|
|
+++ mezzanine_patched_qpsmtpd-0.96/lib/Qpsmtpd/TcpServer.pm 2016-04-15 19:13:13.873874838 +0200
|
||
|
|
@@ -120,7 +120,10 @@
|
||
|
|
while (<STDIN>) {
|
||
|
|
alarm 0;
|
||
|
|
$_ =~ s/\r?\n$//s; # advanced chomp
|
||
|
|
- $self->log(LOGINFO, "dispatching $_");
|
||
|
|
+ my $log = $_;
|
||
|
|
+ $log =~ s/AUTH PLAIN (.*)/AUTH PLAIN <hidden credentials>/
|
||
|
|
+ unless ($self->config('loglevel') || '6') >= 7;
|
||
|
|
+ $self->log(LOGINFO, "dispatching $log");
|
||
|
|
$self->connection->notes('original_string', $_);
|
||
|
|
defined $self->dispatch(split / +/, $_, 2)
|
||
|
|
or $self->respond(502, "command unrecognized: '$_'");
|