Author: hjp
Date: Thu Aug 30 13:18:42 2007
New Revision: 779

Modified:
   trunk/lib/Qpsmtpd/Transaction.pm

Log:
fixed assignment (=> instead of =).


Modified: trunk/lib/Qpsmtpd/Transaction.pm
==============================================================================
--- trunk/lib/Qpsmtpd/Transaction.pm    (original)
+++ trunk/lib/Qpsmtpd/Transaction.pm    Thu Aug 30 13:18:42 2007
@@ -10,7 +10,7 @@
 
 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;
 
 sub new { start(@_) }

Reply via email to