avoid repeated SPF headers

diff --git a/bin/pmgpolicy b/bin/pmgpolicy
index 19c0de31239fbb4a193d1dd96d0a85f33f1ee37b..c017e6e23c57993855d4670eeb860f083ce02339 100755 (executable)
--- a/bin/pmgpolicy
+++ b/bin/pmgpolicy
@@ -626,7 +626,14 @@ sub greylist_value {
     }
 
 
-    my $res = $spf_header ? "prepend $spf_header" : 'dunno';
+    my $res = 'dunno';
+
+    # add spf_header once - SA can re-use this information
+    if (!defined($self->{cache}->{$instance}) ||
+       !$self->{cache}->{$instance}->{spf_header_added}) {
+       $res = "prepend $spf_header" if $spf_header;
+       $self->{cache}->{$instance}->{spf_header_added} = 1;
+    }
 
     return $res if !$self->{use_greylist};