diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2005-04-29 23:51:33 +0000 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2005-04-29 23:51:33 +0000 |
| commit | 2ae6e04c14265fb5044e28eed0aae7898b0ce3be (patch) | |
| tree | ee308dd40b0904cbeac65e23689b2a3c62da6d57 | |
| parent | 37b4097c76b749f90393f8322e4af4c9f231c26a (diff) | |
| download | coreutils-2ae6e04c14265fb5044e28eed0aae7898b0ce3be.tar.xz | |
(tv): Rename tests from obs to obs-plus
if they use file names starting with +.
(test_vector): Don't set _POSIX2_VERSION if obs but not obs-plus.
| -rw-r--r-- | tests/uniq/Test.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/uniq/Test.pm b/tests/uniq/Test.pm index ef5d048a5..259b16c37 100644 --- a/tests/uniq/Test.pm +++ b/tests/uniq/Test.pm @@ -37,12 +37,12 @@ my @tv = ( ['34', '-f 1',"b a\na a\n", "b a\n", 0], ['35', '-f 2',"a a c\nb a c\n", "a a c\n", 0], # Skip over characters. -['obs40', '+1', "aaa\naaa\n", "aaa\n", 0], -['obs41', '+1', "baa\naaa\n", "baa\n", 0], +['obs-plus40', '+1', "aaa\naaa\n", "aaa\n", 0], +['obs-plus41', '+1', "baa\naaa\n", "baa\n", 0], ['42', '-s 1',"aaa\naaa\n", "aaa\n", 0], ['43', '-s 2',"baa\naaa\n", "baa\n", 0], -['obs44', '+1 --', "aaa\naaa\n", "aaa\n", 0], -['obs45', '+1 --', "baa\naaa\n", "baa\n", 0], +['obs-plus44', '+1 --', "aaa\naaa\n", "aaa\n", 0], +['obs-plus45', '+1 --', "baa\naaa\n", "baa\n", 0], # Skip over fields and characters ['50', '-f 1 -s 1',"a aaa\nb ab\n", "a aaa\nb ab\n", 0], ['51', '-f 1 -s 1',"a aaa\nb aaa\n", "a aaa\n", 0], @@ -95,7 +95,7 @@ sub test_vector my ($test_name, $flags, $in, $exp, $ret) = @$t; $Test::input_via{$test_name} = {REDIR => 0, PIPE => 0}; - $test_name =~ /^obs/ + $test_name =~ /^obs-plus/ and $Test::env{$test_name} = ['_POSIX2_VERSION=199209']; } |