summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rwxr-xr-xtests/misc/seq9
2 files changed, 13 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index ed47c2446..4d931f3c3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-03 Jim Meyering <meyering@redhat.com>
+
+ seq: add another test for the %% bug.
+ * tests/misc/seq (fmt-c): Test the other fixed case, too.
+
2007-11-03 Paul Eggert <eggert@cs.ucla.edu>
Fix bug with "seq 10.8 0.1 10.95", plus another bug with %% in format.
diff --git a/tests/misc/seq b/tests/misc/seq
index 73f41336d..ec843bcf0 100755
--- a/tests/misc/seq
+++ b/tests/misc/seq
@@ -36,6 +36,8 @@ use strict;
# Turn off localisation of executable's ouput.
@ENV{qw(LANGUAGE LANG LC_ALL)} = ('C') x 3;
+my $prog = 'seq';
+
my @Tests =
(
['onearg-1', qw(10), {OUT => [(1..10)]}],
@@ -80,6 +82,12 @@ my @Tests =
['fmt-9', '-f "% -3.0f"', qw(-1 0), {OUT => ['-1 ', ' 0 ']}],
['fmt-a', '-f "% -.0f"',qw(-1 0), {OUT => ['-1', ' 0']}],
['fmt-b', qw(-f %%%g%% 1), {OUT => ['%1%']}],
+
+ # In coreutils-[6.0..6.9], this would mistakenly succeed and print "%Lg".
+ ['fmt-c', qw(-f %%g 1), {EXIT => 1},
+ {ERR => "seq: invalid format string: `%%g'\n"
+ . "Try `seq --help' for more information.\n"},
+],
);
# Append a newline to each entry in the OUT array.
@@ -96,7 +104,6 @@ foreach $t (@Tests)
my $save_temps = $ENV{SAVE_TEMPS};
my $verbose = $ENV{VERBOSE};
-my $prog = 'seq';
my $fail = run_tests ($program_name, $prog, \@Tests, $save_temps, $verbose);
exit $fail;