summaryrefslogtreecommitdiff
path: root/bin/apt-why
diff options
context:
space:
mode:
Diffstat (limited to 'bin/apt-why')
-rwxr-xr-xbin/apt-why15
1 files changed, 8 insertions, 7 deletions
diff --git a/bin/apt-why b/bin/apt-why
index 38c967e..0c67cb6 100755
--- a/bin/apt-why
+++ b/bin/apt-why
@@ -13,13 +13,6 @@ my $all = 0;
my $tabwidth;
my $tabsign = "\t";
my @deptypes = qw/Depends Recommends Suggests/;
-GetOptions(
- 'all!' => \$all,
- 'deptype=s' => sub {@deptypes = split(/,/, $_[1])},
- 'depth=i' => \$max_depth,
- 'tabwidth=i' => \$tabwidth,
- 'h|?|help' => \&usage,
-);
my $packagename = shift or die("Usage: $0 [options] <package>; see $0 --help\n");
my @known;
@@ -64,6 +57,14 @@ sub recurse {
return;
}
+GetOptions(
+ 'all!' => \$all,
+ 'deptype=s' => sub {@deptypes = split(/,/, $_[1])},
+ 'depth=i' => \$max_depth,
+ 'tabwidth=i' => \$tabwidth,
+ 'h|?|help' => \&usage,
+);
+
if (defined $tabwidth) {
$tabsign = ' ' x $tabwidth;
}