From a49c7ccfe16be3716de005ce9780e29ed31bb4ea Mon Sep 17 00:00:00 2001
From: Jim Meyering <jim@meyering.net>
Date: Wed, 2 Nov 2005 20:36:36 +0000
Subject: [PATCH] (sk-seek4): New test, to exercise the bug fixed on
 2005-10-31.  This test uses the new, IN_PIPE specifier.

---
 tests/dd/skip-seek | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/tests/dd/skip-seek b/tests/dd/skip-seek
index e0a509d..897c4b7 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};
-- 
2.7.4