Correct "connect" parameters

It only provides rdns and src, neither of the other two parameters.

Reported on tech@ by patrick keshishian <sidster () boxsoft ! com>

Related to commit 83bdfbbfddbf3291b9e118d399cbe75f145ddee9 by op@

Author: afresh1

lib/OpenSMTPd/Filter.pm

@@ -50,7 +50,7 @@ my @filter_fields
     = qw< version timestamp subsystem phase session opaque-token suffix >;
 my %filter_events = (
     'smtp-in' => {
-        'connect'   => [qw< rdns fcrdns src dest >],
+        'connect'   => [qw< rdns src >],
         'helo'      => [qw< identity >],
         'ehlo'      => [qw< identity >],
         'starttls'  => [qw< tls-string >],
@@ -889,12 +889,8 @@ fields.
 
 =item rdns
 
-=item fcrdns
-
 =item src
 
-=item dest
-
 =back
 
 =item helo

t/filter.t

@@ -28,7 +28,13 @@ is CLASS->new(
     on        => {
         filter => {
             'smtp-in' => {
-                connect => sub {'proceed'}
+                connect => sub {
+                    my ( $event, $session ) = @_;
+                    my $e = $session->{events}->[0];
+                    is $e->{rdns}, 'localhost', "Parsed expected rdns";
+                    is $e->{src},  '[::1]',     "Parsed expected src";
+                    return "proceed";
+                },
             }
         }
 })->_handle_filter('0.6|123|smtp-in|connect|abc|def|localhost|[::1]'), {