Test just the timestamp, not length.

diff --git a/tests/ChangeLog b/tests/ChangeLog
index 3a6b805274d81f401aa0cdbc6bb679f3eb72b08a..6d381b4e402d9052764e2a00eee301b9bd436bf6 100644 (file)
--- a/tests/ChangeLog
+++ b/tests/ChangeLog
@@ -1,6 +1,8 @@
 2008-05-31  Micah Cowan  <micah@cowan.name>
 
        * Test-N-current.px: Ensure we catch failures.
+       * Test-N-old.px: Make it test only the timestamp, and not the
+       content length in addition.
 
 2008-05-23  Micah Cowan  <micah@cowan.name>
 

diff --git a/tests/Test-N-old.px b/tests/Test-N-old.px
index 05383dbef8d127fe23ec150c3f604a1f719aa060..ee9a84e09e12630f60c1028f5b0cfc6241e19bfe 100755 (executable)
--- a/tests/Test-N-old.px
+++ b/tests/Test-N-old.px
@@ -10,16 +10,14 @@ use HTTPTest;
 my $oldversion = <<EOF;
 11111111111111111111111111111111111111111111111111
 222222222222222222222222222222222222222222222222222222222222
-EOF
-
-my $newversion = <<EOF;
-11111111111111111111111111111111111111111111111111
-222222222222222222222222222222222222222222222222222222222222
 3333333333333333333333333333333333333333333333333333333333333333333333
 444444444444444444444444444444444444444444444444444444444444
 55555555555555555555555555555555555555555555555555
 EOF
 
+my $newversion = $oldversion;
+$newversion =~ s/^(.{20}).(.*)$/$1x$2/s;
+
 # code, msg, headers, content
 my %urls = (
     '/somefile.txt' => {