From 2a535689fe801441ef8e4a5c6659925528cce106 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Thu, 12 Oct 2006 20:13:29 +0000
Subject: [PATCH] * Reduce the maximum archive size for patch generation to 100
 MB to   prevent trashing on nix.cs.uu.nl.

---
 scripts/generate-patches.pl.in   | 2 +-
 scripts/maintenance/readcache.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/scripts/generate-patches.pl.in b/scripts/generate-patches.pl.in
index 3a35b8518c..4a0233f0f9 100755
--- a/scripts/generate-patches.pl.in
+++ b/scripts/generate-patches.pl.in
@@ -277,7 +277,7 @@ foreach my $p (keys %dstOutPaths) {
         my $srcNarBz2 = getNarBz2 \%srcNarFiles, $closest;
         my $dstNarBz2 = getNarBz2 \%dstNarFiles, $p;
 
-        my $maxNarSize = 150 * 1024 * 1024;
+        my $maxNarSize = 100 * 1024 * 1024;
 
         system("@bunzip2@ < $srcNarBz2 > $tmpDir/A") == 0
             or die "cannot unpack $srcNarBz2";
diff --git a/scripts/maintenance/readcache.pm b/scripts/maintenance/readcache.pm
index c0657913ea..f6beeeeb46 100644
--- a/scripts/maintenance/readcache.pm
+++ b/scripts/maintenance/readcache.pm
@@ -15,7 +15,7 @@ sub readDir {
 }
 
 readDir "/data/webserver/dist/nix-cache";
-readDir "/data/webserver/dist/test";
+readDir "/data/webserver/dist/test-cache";
 readDir "/data/webserver/dist/patches";
 
 print STDERR scalar (keys %archives), "\n";