diff options
Diffstat (limited to 'scripts/dpkg-checkbuilddeps.pl')
| -rwxr-xr-x | scripts/dpkg-checkbuilddeps.pl | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/scripts/dpkg-checkbuilddeps.pl b/scripts/dpkg-checkbuilddeps.pl index 0ef20d486..290b19426 100755 --- a/scripts/dpkg-checkbuilddeps.pl +++ b/scripts/dpkg-checkbuilddeps.pl @@ -13,15 +13,16 @@ require 'dpkg-gettext.pl'; textdomain("dpkg-dev"); sub usage { - print STDERR _g(<<EOF); -Usage: dpkg-checkbuilddeps [-B] [control-file] - -B binary-only, ignore -Indep - control-file control file to process [Default: debian/control] -EOF + printf _g( +"Usage: %s [<option> ...] [<control-file>] + +Options: + control-file control file to process (default: debian/control). + -B binary-only, ignore -Indep. + -h show this help message. +"), $progname; } -my ($me)=$0=~m:.*/(.+):; - my $binary_only=0; my $want_help=0; if (! GetOptions('-B' => \$binary_only, @@ -65,11 +66,11 @@ if (! $binary_only && defined($fi{"C Build-Conflicts-Indep"})) { } if (@unmet) { - printf STDERR _g("%s: Unmet build dependencies: "), $me; + printf STDERR _g("%s: Unmet build dependencies: "), $progname; print STDERR join(" ", @unmet), "\n"; } if (@conflicts) { - printf STDERR _g("%s: Build conflicts: "), $me; + printf STDERR _g("%s: Build conflicts: "), $progname; print STDERR join(" ", @conflicts), "\n"; } exit 1 if @unmet || @conflicts; |