diff options
Diffstat (limited to 'scripts/dpkg-name.pl')
-rwxr-xr-x | scripts/dpkg-name.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/dpkg-name.pl b/scripts/dpkg-name.pl index 9e9caf702..c83221d89 100755 --- a/scripts/dpkg-name.pl +++ b/scripts/dpkg-name.pl @@ -24,7 +24,7 @@ use strict; use File::Basename; use File::Path; -use Dpkg; +use Dpkg qw(); use Dpkg::Gettext; use Dpkg::ErrorHandling; use Dpkg::Control; @@ -43,12 +43,12 @@ my %options = ( sub version() { - printf(_g("Debian %s version %s.\n"), $progname, $version); + printf(_g("Debian %s version %s.\n"), $Dpkg::PROGNAME, $Dpkg::PROGVERSION); } sub usage() { - printf(_g("Usage: %s [<option>...] <file>...\n"), $progname); + printf(_g("Usage: %s [<option>...] <file>...\n"), $Dpkg::PROGNAME); print(_g(" Options: |