diff options
| author | Jim Meyering <jim@meyering.net> | 1997-02-01 16:41:08 +0000 |
|---|---|---|
| committer | Jim Meyering <jim@meyering.net> | 1997-02-01 16:41:08 +0000 |
| commit | 67c51751386d2add78e5477925e3314966f22ad5 (patch) | |
| tree | 9038573367f42e7130c7272fb2770d5c32a6b1f3 /tests | |
| parent | bece4592b4122756046b05b5d2b78ab2506a1363 (diff) | |
| download | coreutils-67c51751386d2add78e5477925e3314966f22ad5.tar.xz | |
.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/cut/mk-script.pl | 4 | ||||
| -rw-r--r-- | tests/head/mk-script.pl | 4 | ||||
| -rw-r--r-- | tests/join/mk-script.pl | 4 | ||||
| -rw-r--r-- | tests/ls/mk-script.pl | 4 |
4 files changed, 8 insertions, 8 deletions
diff --git a/tests/cut/mk-script.pl b/tests/cut/mk-script.pl index 4f10cabae..48b4b1db6 100644 --- a/tests/cut/mk-script.pl +++ b/tests/cut/mk-script.pl @@ -122,8 +122,8 @@ sub spec_to_list ($$$) foreach $i (@explicit_file, @maint_gen_file) { - die "$0: $i: generated test file name would be longer than 20 characters" - if (length ($i) > 20); + die "$0: $i: generated test file name would be longer than 14 characters" + if (length ($i) > 14); } my %h = ( diff --git a/tests/head/mk-script.pl b/tests/head/mk-script.pl index 4f10cabae..48b4b1db6 100644 --- a/tests/head/mk-script.pl +++ b/tests/head/mk-script.pl @@ -122,8 +122,8 @@ sub spec_to_list ($$$) foreach $i (@explicit_file, @maint_gen_file) { - die "$0: $i: generated test file name would be longer than 20 characters" - if (length ($i) > 20); + die "$0: $i: generated test file name would be longer than 14 characters" + if (length ($i) > 14); } my %h = ( diff --git a/tests/join/mk-script.pl b/tests/join/mk-script.pl index 4f10cabae..48b4b1db6 100644 --- a/tests/join/mk-script.pl +++ b/tests/join/mk-script.pl @@ -122,8 +122,8 @@ sub spec_to_list ($$$) foreach $i (@explicit_file, @maint_gen_file) { - die "$0: $i: generated test file name would be longer than 20 characters" - if (length ($i) > 20); + die "$0: $i: generated test file name would be longer than 14 characters" + if (length ($i) > 14); } my %h = ( diff --git a/tests/ls/mk-script.pl b/tests/ls/mk-script.pl index 4f10cabae..48b4b1db6 100644 --- a/tests/ls/mk-script.pl +++ b/tests/ls/mk-script.pl @@ -122,8 +122,8 @@ sub spec_to_list ($$$) foreach $i (@explicit_file, @maint_gen_file) { - die "$0: $i: generated test file name would be longer than 20 characters" - if (length ($i) > 20); + die "$0: $i: generated test file name would be longer than 14 characters" + if (length ($i) > 14); } my %h = ( |