1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/Dpkg/Source/Package/V1.pm b/scripts/Dpkg/Source/Package/V1.pm
index 83b43c45b..596c44e80 100644
--- a/scripts/Dpkg/Source/Package/V1.pm
+++ b/scripts/Dpkg/Source/Package/V1.pm
@@ -22,7 +22,7 @@ our $VERSION = '0.01';
 
 use base 'Dpkg::Source::Package';
 
-use Dpkg;
+use Dpkg qw();
 use Dpkg::Gettext;
 use Dpkg::ErrorHandling;
 use Dpkg::Compression;
@@ -387,7 +387,7 @@ sub do_build {
 
     if ($ur) {
         printf(STDERR _g('%s: unrepresentable changes to source') . "\n",
-               $progname);
+               $Dpkg::PROGNAME);
         exit(1);
     }
 }