about summary refs log tree commit diff
path: root/scripts/maintenance/readcache.pm
diff options
context:
space:
mode:
authorEelco Dolstra <eelco.dolstra@logicblox.com>2012-05-08T19·43-0400
committerEelco Dolstra <eelco.dolstra@logicblox.com>2012-05-08T19·43-0400
commit0c4c8f7a9d09c497d95771c894a5cc3d4276609b (patch)
tree69f34fb0eda2401a9f477ae97994d8248b0ef267 /scripts/maintenance/readcache.pm
parentafa7b8a479e48c5642a796563a615314c0261a1a (diff)
Remove obsolete files (moved to release tree)
Diffstat (limited to 'scripts/maintenance/readcache.pm')
-rw-r--r--scripts/maintenance/readcache.pm21
1 files changed, 0 insertions, 21 deletions
diff --git a/scripts/maintenance/readcache.pm b/scripts/maintenance/readcache.pm
deleted file mode 100644
index 9addf02aa900..000000000000
--- a/scripts/maintenance/readcache.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package readcache;
-use strict;
-
-# Read the archive directories.
-our %archives;
-
-sub readDir {
-    my $dir = shift;
-    opendir(DIR, "$dir") or die "cannot open `$dir': $!";
-    my @as = readdir DIR;
-    foreach my $archive (@as) {
-        next unless $archive =~ /^sha256_/ || $archive =~ /\.nar-bsdiff$/ || $archive =~ /\.nar\.bz2$/;
-        $archives{$archive} = "$dir/$archive";
-    }
-    closedir DIR;
-}
-
-readDir "/data/releases/nars";
-readDir "/data/releases/patches";
-
-print STDERR scalar (keys %archives), "\n";