diag.t: Support multiline perldiag entries better

I.e., don’t require a space before the newline.

diff --git a/t/porting/diag.t b/t/porting/diag.t
index 146d6265865a1bbb6ebe7a883e76e260707285af..bee1e4c44a9c24c998204e77b3df7822d99a0ea3 100644 (file)
--- a/t/porting/diag.t
+++ b/t/porting/diag.t
@@ -79,7 +79,7 @@ while (<$diagfh>) {
         last;
       }
 
-      $cur_entry .= $_;
+      $cur_entry =~ s/ ?\z/ $_/;
     }
 
     $cur_entry =~ s/\n/ /gs; # Fix multi-line headers if they have \n's