From 1499642b50b905758957628a4d87ee797f694e3a Mon Sep 17 00:00:00 2001
From: Jim Meyering <jim@meyering.net>
Date: Sat, 17 Mar 2001 08:49:25 +0000
Subject: Adjust to minor spacing changes in pr headers.

---
 tests/pr/Test.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tests/pr/Test.pm')

diff --git a/tests/pr/Test.pm b/tests/pr/Test.pm
index dd002def2..0643c541e 100644
--- a/tests/pr/Test.pm
+++ b/tests/pr/Test.pm
@@ -333,7 +333,7 @@ my @tv = (
 ['margin-0', '-o 0', '', '', 0],
 
 # BUG fixed: that leading space on 3rd line of output should not be there
-['dbl-sp-a', '-d -l 14 -h ""', "1\n2\n", "\n\n\n\n\n1\n\n2\n\n\n\n\n\n\n", 0],
+['dbl-sp-a', '-d -l 14 -h ""', "1\n2\n", "\n\n-- Date/Time --                                                   Page 1\n\n\n1\n\n2\n\n\n\n\n\n\n", 0],
 # This test failed with 1.22e and earlier.
 ['dbl-sp-b', '-d -t', "1\n2\n", "1\n\n2\n\n", 0],
 
@@ -345,7 +345,7 @@ my @tv = (
 
 sub test_vector
 {
-  my $common_option_prefix = '--test -h x';
+  my $common_option_prefix = '--date-format="-- Date/Time --" -h x';
 
   my @new_tv;
   my $t;
-- 
cgit v1.2.3-54-g00ecf