165
165
my ($self, $dir, $patch, %opts) = @_;
166
166
$opts{"verbose"} = 0 unless defined($opts{"verbose"});
168
168
my $path = File::Spec->catfile($dir, "debian", "patches", $patch);
169
169
my $obj = Dpkg::Source::Patch->new(filename => $path);
171
171
info(_g("applying %s"), $patch) if $opts{"verbose"};
172
172
$obj->apply($dir, timestamp => $opts{"timestamp"},
173
174
force_timestamp => 1, create_dirs => 1, remove_backup => 0,
174
175
options => [ '-t', '-F', '0', '-N', '-p1', '-u',
175
176
'-V', 'never', '-g0', '-E', '-b',