diff options
| author | Jim Meyering <jim@meyering.net> | 1996-09-30 02:57:28 +0000 |
|---|---|---|
| committer | Jim Meyering <jim@meyering.net> | 1996-09-30 02:57:28 +0000 |
| commit | b394529747e867386f7ddb80b602702ce0391a3f (patch) | |
| tree | 3de18e5a965f6334c016b207bcacdfdbdaa98cfc /tests | |
| parent | edfafcd7b79d68c76a56eb3a654a2af842460741 (diff) | |
| download | coreutils-b394529747e867386f7ddb80b602702ce0391a3f.tar.xz | |
use exp_name in msg when open EXP fails.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/sort/build-script.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/sort/build-script.pl b/tests/sort/build-script.pl index d7474f5a9..7df033cbc 100644 --- a/tests/sort/build-script.pl +++ b/tests/sort/build-script.pl @@ -43,7 +43,7 @@ foreach $test_vector (@Test::t) open (IN, ">$in") || die "$0: $in: $!\n"; print IN $input; close (IN) || die "$0: $in: $!\n"; - open (EXP, ">$exp_name") || die "$0: $in: $!\n"; + open (EXP, ">$exp_name") || die "$0: $exp_name: $!\n"; print EXP $expected; close (EXP) || die "$0: $exp_name: $!\n"; my $err_output = "t$test_name.err"; |