open(IN, "patches/$diff") or die $!;
while (<IN>) {
last if /^--- /;
- if (/^Depends-On-Patch: (\S+.diff)$/) {
+ if (m#^\s+patch -p1 <patches/(\S+.diff)# && $1 ne $diff) {
my $dep = $1;
$has_dependencies = 1;
print "\nApplying dependency patch $dep...\n";