Re: How do I add a local patch to a port?

[Simon Barner]

Argh the mailing list software stripped the attachment, so here it is:

#!/usr/bin/perl -w

Advertising

use strict;

my $origfile;
my $file;
my $patch;
my @files = `find . -name "*.orig"`;

foreach $origfile (@files) {
        chomp ($origfile);
        $origfile =~ s/^\.\///;
        $file = $origfile;
        $file =~ s/\.orig$//;
        $patch = $file;
        $patch =~ s/\//::/g;
        $patch = "patch-" . $patch;
        system ("diff -u $origfile $file > $patch\n");
}

pgp00000.pgp
Description: PGP signature