use Dpkg;
use Dpkg::Gettext;
-use Dpkg::ErrorHandling qw(error syserr info);
+use Dpkg::ErrorHandling qw(error syserr info usageerr);
use Dpkg::Compression;
use Dpkg::Source::Archive;
use Dpkg::Source::Functions qw(erasedir);
sub do_build {
my ($self, $dir) = @_;
my @tar_ignore = map { "--exclude=$_" } @{$self->{'options'}{'tar_ignore'}};
- my @argv = $self->{'options'}{'ARGV'};
+ my @argv = @{$self->{'options'}{'ARGV'}};
if (scalar(@argv)) {
usageerr(_g("-b takes only one parameter with format `%s'"),