X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=installcheck%2Fgnutar.pl;h=886fd089c0e7c35719b78a90d801d437f6c5fe6c;hb=cd0b924f27312d57bd42f6c4fae2b795139e2d0b;hp=a7eaecd9332566ae5541cd88ccfe698d4a9dd506;hpb=011a59f5a54864108a16af570a6b287410597cc2;p=debian%2Famanda diff --git a/installcheck/gnutar.pl b/installcheck/gnutar.pl index a7eaecd..886fd08 100644 --- a/installcheck/gnutar.pl +++ b/installcheck/gnutar.pl @@ -93,12 +93,14 @@ my %version_classes = ( '>=1.16' => $numeric_version >= 11591, '>=1.16-no-wc' => $numeric_version >= 11591 && !$wc_default_changed, # normal '>=1.16-wc' => $numeric_version >= 11591 && $wc_default_changed, # stupid distros screw things up! + '1.16..<1.25' => $numeric_version >= 11591 && $numeric_version < 12500, '<1.23' => $numeric_version < 12300, '>=1.23' => $numeric_version >= 12300, '*' => 1, '1.23' => ($numeric_version >= 12290 and $numeric_version <= 12300), - '!1.23' => ($numeric_version < 12290 || $numeric_version > 12300), + '!1.23' => ($numeric_version < 12290 || ($numeric_version > 12300 && $numeric_version < 12500)), + '>=1.25' => $numeric_version >= 12500. ); # include and exclude all use the same set of patterns and filenames @@ -131,28 +133,30 @@ my $named_expectations = [ 'gamma', 'delta', 'epsilon', - 'empty', ], - # al be ga de ep empty - [ 1, 1, 1, 1, 1, 1, ], # './A*A' => 'A*A', - [ 1, 1, 1, 1, 0, 0, ], # './A*A' => 'AxA', - [ 1, 1, 1, 1, 1, 1, ], # './B?B' => 'B?B', - [ 1, 1, 1, 1, 0, 0, ], # './B?B' => 'BxB', - [ 0, 0, 0, 0, 1, 1, ], # './C[C' => 'C[C', - [ 1, 1, 1, 1, 1, 1, ], # './D]D' => 'D]D', - [ 1, 0, 0, 1, 1, 1, ], # './E\\E' => 'E\\E', - [ 1, 1, 1, 1, 1, 1, ], # './F\'F' => 'F\'F', - [ 1, 1, 1, 1, 1, 1, ], # './G"G' => 'G"G', - [ 1, 1, 1, 1, 1, 1, ], # './H H' => 'H H', - [ 1, 1, 1, 0, 0, 0, ], # './A\\*A' => 'A*A', - [ 0, 0, 0, 0, 0, 0, ], # './A\\*A' => 'AxA', - [ 0, 0, 1, 0, 0, 0, ], # './B\\?B' => 'B?B', - [ 0, 0, 0, 0, 0, 0, ], # './B\\?B' => 'BxB', - [ 1, 1, 1, 0, 0, 0, ], # './C\\[C' => 'C[C', - [ 0, 1, 1, 0, 0, 0, ], # './D\\]D' => 'D]D', - [ 1, 0, 1, 0, 1, 0, ], # './E\\\\E' => 'E\\E', - [ 0, 1, 1, 0, 0, 0, ], # './F\\\'F' => 'F\'F', - [ 0, 1, 1, 0, 0, 0, ], # './G\\"G' => 'G"G', - [ 0, 1, 1, 0, 0, 0, ], # './H\\ H' => 'H H', + 'zeta', + 'eta', + 'empty', ], + # al be ga de ep ze et empty + [ 1, 1, 1, 1, 1, 1, 1, 1, ], # './A*A' => 'A*A', + [ 1, 1, 1, 1, 0, 1, 1, 0, ], # './A*A' => 'AxA', + [ 1, 1, 1, 1, 1, 1, 1, 1, ], # './B?B' => 'B?B', + [ 1, 1, 1, 1, 0, 1, 1, 0, ], # './B?B' => 'BxB', + [ 0, 0, 0, 0, 1, 1, 1, 1, ], # './C[C' => 'C[C', + [ 1, 1, 1, 1, 1, 1, 1, 1, ], # './D]D' => 'D]D', + [ 1, 0, 0, 1, 1, 0, 0, 1, ], # './E\\E' => 'E\\E', + [ 1, 1, 1, 1, 1, 1, 1, 1, ], # './F\'F' => 'F\'F', + [ 1, 1, 1, 1, 1, 1, 1, 1, ], # './G"G' => 'G"G', + [ 1, 1, 1, 1, 1, 1, 1, 1, ], # './H H' => 'H H', + [ 1, 1, 1, 0, 0, 1, 1, 0, ], # './A\\*A' => 'A*A', + [ 0, 0, 0, 0, 0, 0, 0, 0, ], # './A\\*A' => 'AxA', + [ 0, 0, 1, 0, 0, 0, 1, 0, ], # './B\\?B' => 'B?B', + [ 0, 0, 0, 0, 0, 0, 0, 0, ], # './B\\?B' => 'BxB', + [ 1, 1, 1, 0, 0, 1, 1, 0, ], # './C\\[C' => 'C[C', + [ 0, 1, 1, 0, 0, 1, 1, 0, ], # './D\\]D' => 'D]D', + [ 1, 0, 1, 0, 1, 0, 1, 0, ], # './E\\\\E' => 'E\\E', + [ 0, 1, 1, 0, 0, 1, 1, 0, ], # './F\\\'F' => 'F\'F', + [ 0, 1, 1, 0, 0, 1, 1, 0, ], # './G\\"G' => 'G"G', + [ 0, 1, 1, 0, 0, 1, 1, 0, ], # './H\\ H' => 'H H', ]; sub get_expectation { @@ -345,7 +349,8 @@ test_gnutar_inclusion( extra_args => [ '--wildcards' ], expectations => { '<1.16' => 'alpha', - '>=1.16' => 'beta', + '1.16..<1.25' => 'beta', + '>=1.25' => 'zeta', }, ); @@ -353,7 +358,8 @@ test_gnutar_inclusion( extra_args => [ '--wildcards', '--no-unquote' ], expectations => { '<1.16' => undef, - '>=1.16' => 'gamma', + '1.16..<1.25' => 'gamma', + '>=1.25' => 'eta', }, ); @@ -464,6 +470,7 @@ test_gnutar_exclusion( expectations => { '!1.23' => 'gamma', '1.23' => 'delta', + '>=1.25' => 'eta', }, );