byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Oops, forgot to remove all traces of Qmsptmd::Auth while I was at it.

Browse Source 
Also made auth_vpopmail_sql be quieter about problems authenticating.

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@607 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
John Peacock 2006-01-27 17:16:13 +00:00
parent 29d739b009
commit 347e5d328f
3 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lib/Qpsmtpd/PollServer.pm
View File

@ -28,7 +28,6 @@ use fields qw(
_continuation _continuation
); );
use Qpsmtpd::Constants; use Qpsmtpd::Constants;
use Qpsmtpd::Auth;
use Qpsmtpd::Address; use Qpsmtpd::Address;
use Danga::DNS; use Danga::DNS;
use Mail::Header; use Mail::Header;

1
lib/Qpsmtpd/SMTP.pm
View File

@ -8,7 +8,6 @@ use Carp;
use Qpsmtpd::Plugin; use Qpsmtpd::Plugin;
use Qpsmtpd::Constants; use Qpsmtpd::Constants;
use Qpsmtpd::Auth;
use Qpsmtpd::Address (); use Qpsmtpd::Address ();
use Mail::Header (); use Mail::Header ();

5
plugins/auth/auth_vpopmail_sql
View File

@ -67,8 +67,9 @@ sub authsql {
my $dbuser = "vpopmailuser"; my $dbuser = "vpopmailuser";
my $dbpasswd = "**********"; my $dbpasswd = "**********";
my $dbh = DBI->connect( $connect, $dbuser, $dbpasswd ); my $dbh = DBI->connect( $connect, $dbuser, $dbpasswd,
$dbh->{ShowErrorStatement} = 1; { PrintError => 0, } )
or return DECLINED;
my ( $self, $transaction, $method, $user, $passClear, $passHash, $ticket ) = my ( $self, $transaction, $method, $user, $passClear, $passHash, $ticket ) =
@_; @_;