(sk-seek4): New test, to exercise the bug

fixed on 2005-10-31.  This test uses the new, IN_PIPE specifier.

1 files changed, 7 insertions, 0 deletions

diff --git a/tests/dd/skip-seek b/tests/dd/skip-seek
index e0a509d41..897c4b794 100755
--- a/tests/dd/skip-seek
+++ b/tests/dd/skip-seek
@@ -61,6 +61,13 @@ my @Tests =
       {OUT=> "01234567  abcdefghij          "},
       {ERR=> "2+1 records in\n0+1 records out\n1 truncated record\n"},
      ],
+     [
+      # Before fileutils-5.93, this would output just "c\n".
+      'sk-seek4', qw(bs=1 skip=1 status=noxfer),
+      {IN_PIPE=> "abc\n"},
+      {OUT=> "bc\n"},
+      {ERR=> "3+0 records in\n3+0 records out\n"},
+     ],
     );
 
 my $save_temps = $ENV{DEBUG};