Change 61
Change 61 by nullbyte@nullbyte-gentoo on 2004/03/05 00:20:51
bounces have an empty sender so they all looked like the same triplet. also lc() addresses.
added a test, because ksimpson keeps asking 'does it have tests'
Affected files ...| //depot/projects/greylistd/lib/Mail/Greylist.pm#2 | ktext | |
| //depot/projects/greylistd/t/01-basic.t#1 | text |
==== //depot/projects/greylistd/lib/Mail/Greylist.pm#2 (ktext) ====
| @@ -30,7 +30,7 @@ | ||
| 30 | 30 | |
| 31 | 31 | sub triplet { |
| 32 | 32 | my ($self, $ip, $from, $to) = @_; |
| 33 | return join("/", $ip, $from, $to); | |
| 33 | return join("/", $ip, lc($from || '<>'), lc $to); | |
| 34 | 34 | } |
| 35 | 35 | |
| 36 | 36 | # returns "DUNNO" to let postfix carry on, or a defer action |