From 36d9258c0dbfeab095dc5727b6ebcb55afacb0a6 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Tue, 23 Jan 2007 16:05:59 +0000
Subject: * Successors have been gone for ages.

---
 scripts/generate-patches.pl.in | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

(limited to 'scripts/generate-patches.pl.in')

diff --git a/scripts/generate-patches.pl.in b/scripts/generate-patches.pl.in
index 67a6adaa7113..9e355f6aee28 100755
--- a/scripts/generate-patches.pl.in
+++ b/scripts/generate-patches.pl.in
@@ -29,22 +29,19 @@ print "TEMP = $tmpDir\n";
 
 my %srcNarFiles;
 my %srcPatches;
-my %srcSuccessors;
 
 my %dstNarFiles;
 my %dstPatches;
-my %dstSuccessors;
 
 readManifest "$srcDir/MANIFEST",
-    \%srcNarFiles, \%srcPatches, \%srcSuccessors;
+    \%srcNarFiles, \%srcPatches;
 
 readManifest "$dstDir/MANIFEST",
-    \%dstNarFiles, \%dstPatches, \%dstSuccessors;
+    \%dstNarFiles, \%dstPatches;
 
 
 sub findOutputPaths {
     my $narFiles = shift;
-    my $successors = shift;
 
     my %outPaths;
     
@@ -69,10 +66,10 @@ sub findOutputPaths {
 }
 
 print "finding src output paths...\n";
-my %srcOutPaths = findOutputPaths \%srcNarFiles, \%srcSuccessors;
+my %srcOutPaths = findOutputPaths \%srcNarFiles;
 
 print "finding dst output paths...\n";
-my %dstOutPaths = findOutputPaths \%dstNarFiles, \%dstSuccessors;
+my %dstOutPaths = findOutputPaths \%dstNarFiles;
 
 
 sub getNameVersion {
@@ -400,4 +397,4 @@ do {
 
 # Rewrite the manifest of the destination (with the new patches).
 writeManifest "$dstDir/MANIFEST",
-    \%dstNarFiles, \%dstPatches, \%dstSuccessors;
+    \%dstNarFiles, \%dstPatches;
-- 
cgit 1.4.1