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

fixed assignment (=> instead of =).

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@779 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Peter J. Holzer 2007-08-30 20:18:42 +00:00
parent e6113d586d
commit b57ee765de
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/Qpsmtpd/Transaction.pm
View File

@ -10,7 +10,7 @@ use Time::HiRes qw(gettimeofday);
use IO::File qw(O_RDWR O_CREAT); use IO::File qw(O_RDWR O_CREAT);
my $SALT_HOST => crypt(hostname, chr(65+rand(57)).chr(65+rand(57))); my $SALT_HOST = crypt(hostname, chr(65+rand(57)).chr(65+rand(57)));
$SALT_HOST =~ tr/A-Za-z0-9//cd; $SALT_HOST =~ tr/A-Za-z0-9//cd;
sub new { start(@_) } sub new { start(@_) }