X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FTest%2FValgrind%2FSuppressions.pm;h=f5f576a676f71b6a8b1b53017c5d4884fafe89a0;hb=9ec6f49f668f2c97827213fb0b6566d7eb764a15;hp=a125839a6dff017fee51fd0e9804c66c7ebd80e0;hpb=a08a925178ff4a5e8a68dc9ecc21d50c67049939;p=perl%2Fmodules%2FTest-Valgrind.git

diff --git a/lib/Test/Valgrind/Suppressions.pm b/lib/Test/Valgrind/Suppressions.pm
index a125839..f5f576a 100644
--- a/lib/Test/Valgrind/Suppressions.pm
+++ b/lib/Test/Valgrind/Suppressions.pm
@@ -9,11 +9,11 @@ Test::Valgrind::Suppressions - Generate suppressions for given tool and command.
 
 =head1 VERSION
 
-Version 1.15
+Version 1.18
 
 =cut
 
-our $VERSION = '1.15';
+our $VERSION = '1.18';
 
 =head1 DESCRIPTION
 
@@ -115,9 +115,9 @@ sub maybe_generalize {
  1 while $supp =~ s/[^\r\n]*:\s*\*\s*$//;
 
  # With valgrind 3.4.0, we can replace unknown series of frames by '...'
- if ($sess->version ge '3.4.0') {
+ if ($sess->version >= '3.4.0') {
   $supp .= "...\n";
-  $supp =~ s/(?:^\s*(?:\.{3}|\*:\S*|obj:\*)\s*\n)+/...\n/mg;
+  $supp =~ s/(?:^\s*(?:\.{3}|\*:\S*|obj:\*)\s*(?:\n|\z))+/...\n/mg;
  }
 
  $supp;