remove empty record structure in order to stringify it correctly

issue fastmail#19
bigio · Aug 27, 2024 · e194e7f · e194e7f
1 parent 8cd8323
commit e194e7f
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/Mail/SPF/Server.pm b/lib/Mail/SPF/Server.pm
@@ -330,6 +330,8 @@ sub process {
     }
     catch Mail::SPF::ENoAcceptableRecord with {
 	if((not defined $request->{record}->{terms}[0]->{domain_spec}->{text}) or ($request->{record}->{terms}[0]->{domain_spec}->{text} !~ /\.\./)) {
+          # remove empty record structure in order to stringify it correctly
+          undef $request->{record};
           $result = $self->result_class('none'     )->new($self, $request, shift->text);
         } else {
           $result = $self->result_class('permerror')->new($self, $request, shift->text);