diff options
author | Eelco Dolstra <e.dolstra@tudelft.nl> | 2007-01-23T16·05+0000 |
---|---|---|
committer | Eelco Dolstra <e.dolstra@tudelft.nl> | 2007-01-23T16·05+0000 |
commit | 36d9258c0dbfeab095dc5727b6ebcb55afacb0a6 (patch) | |
tree | 9b2883ce615f5cf007f48f1227c9de284f8c05d5 /scripts/readmanifest.pm.in | |
parent | 7bc30e1ca8e20ee54175881364663ce5aaf1fa1c (diff) |
* Successors have been gone for ages.
Diffstat (limited to 'scripts/readmanifest.pm.in')
-rw-r--r-- | scripts/readmanifest.pm.in | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/scripts/readmanifest.pm.in b/scripts/readmanifest.pm.in index 28198eba4d1d..0e15133cf121 100644 --- a/scripts/readmanifest.pm.in +++ b/scripts/readmanifest.pm.in @@ -35,7 +35,6 @@ sub readManifest { my $manifest = shift; my $narFiles = shift; my $patches = shift; - my $successors = shift; my $allowConflicts = shift; $allowConflicts = 0 unless defined $allowConflicts; @@ -51,7 +50,6 @@ sub readManifest { my $url; my $hash; my $size; - my @preds; my $basePath; my $baseHash; my $patchType; @@ -75,7 +73,6 @@ sub readManifest { undef $url; undef $hash; undef $size; - @preds = (); undef $narHash; undef $basePath; undef $baseHash; @@ -117,10 +114,6 @@ sub readManifest { }; } - foreach my $p (@preds) { - $$successors{$p} = $storePath; - } - } elsif ($type eq "patch") { @@ -138,7 +131,7 @@ sub readManifest { elsif (/^\s*Hash:\s*(\S+)\s*$/) { $hash = $1; } elsif (/^\s*URL:\s*(\S+)\s*$/) { $url = $1; } elsif (/^\s*Size:\s*(\d+)\s*$/) { $size = $1; } - elsif (/^\s*SuccOf:\s*(\/\S+)\s*$/) { push @preds, $1; } + elsif (/^\s*SuccOf:\s*(\/\S+)\s*$/) { } # obsolete elsif (/^\s*BasePath:\s*(\/\S+)\s*$/) { $basePath = $1; } elsif (/^\s*BaseHash:\s*(\S+)\s*$/) { $baseHash = $1; } elsif (/^\s*Type:\s*(\S+)\s*$/) { $patchType = $1; } |