diff options
author | Jim Meyering <jim@meyering.net> | 2006-07-08 07:37:16 +0000 |
---|---|---|
committer | Jim Meyering <jim@meyering.net> | 2006-07-08 07:37:16 +0000 |
commit | 2d9ebdc8ae382dca294cae79032026b0b34e2fb6 (patch) | |
tree | bdfff467fc0cbbc9cccad2f14314ff5c345aa14c /tests | |
parent | d80c39084251790a161fdb4ab5126b48233c6898 (diff) | |
download | coreutils-2d9ebdc8ae382dca294cae79032026b0b34e2fb6.tar.xz |
* tests/Coreutils.pm: Remove one of two adjacent "then"s in a comment.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Coreutils.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/Coreutils.pm b/tests/Coreutils.pm index 6d3c4d2f2..1490fb1d3 100644 --- a/tests/Coreutils.pm +++ b/tests/Coreutils.pm @@ -9,7 +9,7 @@ use FileHandle; use File::Compare qw(compare); @ISA = qw(Exporter); -($VERSION = '$Revision: 1.3 $ ') =~ tr/[0-9].//cd; +($VERSION = '$Revision: 1.4 $ ') =~ tr/[0-9].//cd; @EXPORT = qw (run_tests); my $debug = $ENV{DEBUG}; @@ -470,7 +470,7 @@ sub run_tests ($$$$$) my $out = $actual{$eo}; my $orig = "$out.orig"; - # Move $out aside (to $orig), then then recreate $out + # Move $out aside (to $orig), then recreate $out # by transforming each line of $orig via $subst_expr. rename $out, $orig or (warn "$program_name: cannot rename $out to $orig: $!\n"), |