From: Raphael Hertzog <hertzog@debian.org>
Date: Tue, 18 Mar 2008 16:56:50 +0000 (+0100)
Subject: * scripts/Dpkg/Source/Package/V3_0/native.pm: Import missing function and bugfix.
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=960d661a9a03a6a5c79f98effd63fc5cffa19420;p=dpkg

* scripts/Dpkg/Source/Package/V3_0/native.pm: Import missing function and bugfix.
---

diff --git a/scripts/Dpkg/Source/Package/V3_0/native.pm b/scripts/Dpkg/Source/Package/V3_0/native.pm
index 5efab3ef..1ecd1dfb 100644
--- a/scripts/Dpkg/Source/Package/V3_0/native.pm
+++ b/scripts/Dpkg/Source/Package/V3_0/native.pm
@@ -23,7 +23,7 @@ use base 'Dpkg::Source::Package';
 
 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);
@@ -66,7 +66,7 @@ sub can_build {
 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'"),