diff options
| author | Jim Meyering <jim@meyering.net> | 2002-02-17 22:39:47 +0000 |
|---|---|---|
| committer | Jim Meyering <jim@meyering.net> | 2002-02-17 22:39:47 +0000 |
| commit | 09eb7ebbcae58cf8e17fb0ab686e68a3c28132d9 (patch) | |
| tree | b83fa78f491b3855149b338468af33632d9fa75e | |
| parent | 91564c12b0b4dedc814e03b3e6f8ac9a8a2e3fd0 (diff) | |
| download | coreutils-09eb7ebbcae58cf8e17fb0ab686e68a3c28132d9.tar.xz | |
Tell head to accept old-style options like `-1'.
| -rw-r--r-- | tests/head/Test.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/head/Test.pm b/tests/head/Test.pm index b278dbcf2..a81c36f97 100644 --- a/tests/head/Test.pm +++ b/tests/head/Test.pm @@ -2,6 +2,9 @@ package Test; require 5.002; use strict; +# Tell head to accept old-style options like `-1'. +$Test::env_default = ['_POSIX2_VERSION=199209']; + my @tv = ( # test name, options, input, expected output, expected return code # @@ -26,8 +29,8 @@ my @tv = ( ['obs-1', '-1c', "", "", 0], ['obs-2', '-1c', "12", "1", 0], ['obs-3', '-14c', "1234567890abcdefg", "1234567890abcd", 0], -['obs-4', '-2b', [\'in'], [\'in-1024'], 0], #' -['obs-5', '-1k', [\'in'], [\'in-1024'], 0], #' +['obs-4', '-2b', [\'in'], [\'in-1024'], 0], +['obs-5', '-1k', [\'in'], [\'in-1024'], 0], # This test fails for textutils-1.22, because head let 4096m overflow to 0 # and did not fail. Now head fails with a diagnostic. |