[svn:qpsmtpd] r957 - trunk/lib/Qpsmtpd

[vetinari]

Author: vetinari
Date: Sun Nov 16 00:28:29 2008
New Revision: 957

Modified:
   trunk/lib/Qpsmtpd/TcpServer.pm

Log:
keep the square brackets around the IP as "remote_host" if the reverse lookup 
failed

Modified: trunk/lib/Qpsmtpd/TcpServer.pm
==============================================================================
--- trunk/lib/Qpsmtpd/TcpServer.pm      (original)
+++ trunk/lib/Qpsmtpd/TcpServer.pm      Sun Nov 16 00:28:29 2008
@@ -54,7 +54,7 @@
     # if the local dns resolver doesn't filter it out we might get
     # ansi escape characters that could make a ps axw do "funny"
     # things. So to be safe, cut them out.  
-    $remote_host =~ tr/a-zA-Z\.\-0-9//cd;
+    $remote_host =~ tr/a-zA-Z\.\-0-9\[\]//cd;
 
     $first_0 = $0 unless $first_0;
     my $now = POSIX::strftime("%H:%M:%S %Y-%m-%d", localtime);