diff options
author | Jim Meyering <jim@meyering.net> | 1996-12-15 22:17:29 +0000 |
---|---|---|
committer | Jim Meyering <jim@meyering.net> | 1996-12-15 22:17:29 +0000 |
commit | f789ddbdda824c96a128bfaec0c1b2c67b3d2c78 (patch) | |
tree | 484ff0fb9751208f0bd32c6ba82a5a6a741a976e /tests/ls | |
parent | 1f1bd53b86b4e4f1c557eb7111f05153afcd79a4 (diff) | |
download | coreutils-f789ddbdda824c96a128bfaec0c1b2c67b3d2c78.tar.xz |
.
Diffstat (limited to 'tests/ls')
-rw-r--r-- | tests/ls/mk-script.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/ls/mk-script.pl b/tests/ls/mk-script.pl index bcff12cc6..0a8778512 100644 --- a/tests/ls/mk-script.pl +++ b/tests/ls/mk-script.pl @@ -52,7 +52,8 @@ sub spec_to_list ($$$) my $file_contents; foreach $file_contents (@content_string) { - my $gen_file = "t$test_name.$type$i"; + my $suffix = (@content_string > 1 ? $i : ''); + my $gen_file = "t$test_name.$type$suffix"; push (@all_file, $gen_file); push (@gen_file, $gen_file); open (F, ">$gen_file") || die "$0: $gen_file: $!\n"; |