From 09eb7ebbcae58cf8e17fb0ab686e68a3c28132d9 Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Sun, 17 Feb 2002 22:39:47 +0000 Subject: Tell head to accept old-style options like `-1'. --- tests/head/Test.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'tests/head') 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. -- cgit v1.2.3-70-g09d2