Test-c-partial.px improvement.

diff --git a/tests/ChangeLog b/tests/ChangeLog
index eae267077f4fb0cb55fcc7e1d8f2007f2f820920..73d93a2f9304182121a399ab7668cc25170afd6d 100644 (file)
--- a/tests/ChangeLog
+++ b/tests/ChangeLog
@@ -5,9 +5,10 @@
        * Test-N-old.px: Make it test only the timestamp, and not the
        content length in addition.
 
-       * Test-N-smaller.px: added.
+       * Test-N-smaller.px, Test-N-no-info.px: added.
 
-       * Test-N-no-info.px: added.
+       * Test-c-partial.px: Improve checking that the file was
+       partially retrieved, rather than overwritten.
 
        * run-px: Added Test-N-smaller.px, Test-N-no-info.px.
 

diff --git a/tests/Test-c-partial.px b/tests/Test-c-partial.px
index ee48cbf621ba2ee82becac724eb6c8ab2b4375f1..ddf1d4be19b96db31da0b6f318a797110b3d553b 100755 (executable)
--- a/tests/Test-c-partial.px
+++ b/tests/Test-c-partial.px
@@ -9,17 +9,22 @@ use HTTPTest;
 
 my $partiallydownloaded = <<EOF;
 11111111111111111111111111111111111111111111111111
-222222222222222222222222222222222222222222222222222222222222
+22222222x222222222222222222222222222222222222222222222222222
 EOF
 
-my $wholefile = <<EOF;
-11111111111111111111111111111111111111111111111111
-222222222222222222222222222222222222222222222222222222222222
+my $rest = <<EOF;
 3333333333333333333333333333333333333333333333333333333333333333333333
 444444444444444444444444444444444444444444444444444444444444
 55555555555555555555555555555555555555555555555555
 EOF
 
+my $wholefile = <<EOF . $rest;
+11111111111111111111111111111111111111111111111111
+222222222222222222222222222222222222222222222222222222222222
+EOF
+
+my $downloadedfile = $partiallydownloaded . $rest;
+
 # code, msg, headers, content
 my %urls = (
     '/somefile.txt' => {
@@ -44,7 +49,7 @@ my %existing_files = (
 
 my %expected_downloaded_files = (
     'somefile.txt' => {
-        content => $wholefile,
+        content => $downloadedfile,
     },
 );