# HG changeset patch
# User heiko
# Date 1464772728 -7200
# Node ID 16b4815a6a1500f8fe6b047106681d9a523fe3e0
# Parent  a118304a1f794fa754da77b45327d7b4653d75f9
Do not include the "autokey" in the "greykey"

diff -r a118304a1f79 -r 16b4815a6a15 lib/Exim/Grey.pm
--- a/lib/Exim/Grey.pm	Wed Jun 01 11:18:23 2016 +0200
+++ b/lib/Exim/Grey.pm	Wed Jun 01 11:18:48 2016 +0200
@@ -57,7 +57,8 @@
     my $delay  = shift // $DEFAULT{delay};
     my $db     = shift // $DEFAULT{db};
     my $now    = time();
-    my ($auto) = $item =~ /.*?\/(.+?)$/;
+    my ($auto) = $item =~ /.*?\/(.+?)$/ # remove the /<autokey> from the item
+        and $item =~ s/\/.*?$//;
     my $rc;
 
     connectDB(\my %h, $db);