← Back to branch summary

~ubuntu-branches/ubuntu/karmic/openoffice.org-l10n/karmic

« back to all changes in this revision

Viewing changes to ooo-build/bin/patch-remove

  • Committer: Bazaar Package Importer
  • Author(s): Matthias Klose
  • Date: 2006-04-27 19:29:22 UTC
  • Revision ID: james.westby@ubuntu.com-20060427192922-2dburxv3b63f8v0u
Tags: 2.0.2-2ubuntu5
* Copy of the openoffice.org source.
  - debian/control.in: Change source name.
  - debian/changelog: Change source name.
  - debian/control: Regenerate control file.
* Add kurdish translations exported from Rosetta (2006-04-18).
* Workaround bad message strings in recently included GSI files.

Show diffs side-by-side

added added

removed removed

Lines of Context:
ooo-build/bin/patch-remove
 
1
#!/usr/bin/perl -w
 
2
 
 
3
my $pattern = shift (@ARGV);
 
4
$pattern = 'util/defs/wntmsci' if (!defined $pattern);
 
5
 
 
6
# removes crud from diffs
 
7
my $filter = 0;
 
8
 
 
9
while (<>) {
 
10
    my $line = $_;
 
11
    if ($line =~ m/^--- ([^ \t]*)/) { # spaces in fname ?
 
12
        my $path = $1;
 
13
        if ($path =~ m/$pattern/) {
 
14
            $filter = 1;
 
15
            print STDERR "Prune $path section\n";
 
16
        } else {
 
17
            $filter = 0;
 
18
#           print STDERR "Preserve $path section\n";
 
19
        }
 
20
    }
 
21
    print $line if (!$filter);
 
22
}