DEBUG — enable Interchange debugging
Interchange 5.9.0:
Source: lib/Vend/Util.pm
Line 2230 (context shows lines 2220-2234 in send_mail():2112)
last SMTP unless $none and $mhost; eval { require Net::SMTP; }; last SMTP if $@; $ok = 0; $using = "Net::SMTP (mail server $mhost)"; #::logDebug("using $using"); undef $none; my $smtp = Net::SMTP->new($mhost, Debug => $Global::Variable->{DEBUG}, \ Hello => $helo) or last SMTP; #::logDebug("smtp object $smtp"); my $from = $::Variable->{MV_MAILFROM} || $Global::Variable->{MV_MAILFROM}
Source: lib/Vend/Email.pm
Line 679 (context shows lines 669-683 in send_mail_legacy():561)
last SMTP unless $none and $mhost; eval { require Net::SMTP; }; last SMTP if $@; $ok = 0; $using = "Net::SMTP (mail server $mhost)"; #::logDebug("using $using"); undef $none; my $smtp = Net::SMTP->new($mhost, Debug => $Global::Variable->{DEBUG}, Hello => $helo); #::logDebug("smtp object $smtp"); my $from = $::Variable->{MV_MAILFROM} || $Global::Variable->{MV_MAILFROM}