From 3a0900f0aeb7a7fb8b741b22bc6be48c5007b79c Mon Sep 17 00:00:00 2001 From: Matt Simerson Date: Fri, 26 Apr 2013 03:35:02 -0400 Subject: [PATCH] SMTP.pm: reduce auth details from Received header. based on patch from Devin Carraway http://www.nntp.perl.org/group/perl.qpsmtpd/2012/08/msg9954.html --- META.yml | 33 +++++++++++++++++++++++++++++++++ lib/Qpsmtpd/SMTP.pm | 2 +- 2 files changed, 34 insertions(+), 1 deletion(-) create mode 100644 META.yml diff --git a/META.yml b/META.yml new file mode 100644 index 0000000..69d9edd --- /dev/null +++ b/META.yml @@ -0,0 +1,33 @@ +--- +abstract: 'Flexible smtpd daemon written in Perl' +author: + - 'Ask Bjoern Hansen ' +build_requires: + ExtUtils::MakeMaker: 0 +configure_requires: + ExtUtils::MakeMaker: 0 +dynamic_config: 0 +generated_by: 'ExtUtils::MakeMaker version 6.64, CPAN::Meta::Converter version 2.120921' +license: unknown +meta-spec: + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: 1.4 +name: qpsmtpd +no_index: + directory: + - t + - inc +requires: + Data::Dumper: 0 + Date::Parse: 0 + File::Tail: 0 + File::Temp: 0 + IO::Socket::SSL: 0 + MIME::Base64: 0 + Mail::DKIM: 0 + Mail::Header: 0 + Net::DNS: 0.39 + Net::IP: 0 + Time::HiRes: 0 + Time::TAI64: 0 +version: 0.91 diff --git a/lib/Qpsmtpd/SMTP.pm b/lib/Qpsmtpd/SMTP.pm index a74dead..40d8b38 100644 --- a/lib/Qpsmtpd/SMTP.pm +++ b/lib/Qpsmtpd/SMTP.pm @@ -824,7 +824,7 @@ sub received_line { . " (HELO " . $self->connection->hello_host . ") (" . $self->connection->remote_ip - . ")\n $authheader by " + . ")\n by " . $self->config('me') . " (qpsmtpd/" . $self->version