lib/coreutils
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/coreutils.git synced 2025-08-05 20:15:51 +03:00
Code Activity

* tests/Coreutils.pm: Remove one of two adjacent "then"s in a comment.

Browse Source
This commit is contained in:
Jim Meyering
2006-07-08 07:37:16 +00:00
parent d80c390842
commit 2d9ebdc8ae
2 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
ChangeLog
View File

@@ -3,6 +3,8 @@
* Makefile.maint (sc_the_the): New rule. * Makefile.maint (sc_the_the): New rule.
* src/dd.c (skip): Remove one of two adjacent "the"s in a comment. * src/dd.c (skip): Remove one of two adjacent "the"s in a comment.
* tests/Coreutils.pm (run_tests): Remove one of two adjacent "then"s
in a comment.
2006-07-07 Jim Meyering <jim@meyering.net> 2006-07-07 Jim Meyering <jim@meyering.net>

4
tests/Coreutils.pm
View File

@@ -9,7 +9,7 @@ use FileHandle;
use File::Compare qw(compare); use File::Compare qw(compare);
@ISA = qw(Exporter); @ISA = qw(Exporter);
($VERSION = '$Revision: 1.3 $ ') =~ tr/[0-9].//cd; ($VERSION = '$Revision: 1.4 $ ') =~ tr/[0-9].//cd;
@EXPORT = qw (run_tests); @EXPORT = qw (run_tests);
my $debug = $ENV{DEBUG}; my $debug = $ENV{DEBUG};
@@ -470,7 +470,7 @@ sub run_tests ($$$$$)
my $out = $actual{$eo}; my $out = $actual{$eo};
my $orig = "$out.orig"; 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. # by transforming each line of $orig via $subst_expr.
rename $out, $orig rename $out, $orig
or (warn "$program_name: cannot rename $out to $orig: $!\n"), or (warn "$program_name: cannot rename $out to $orig: $!\n"),