summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@derf.homelinux.org>2010-01-09 15:14:06 +0100
committerDaniel Friesel <derf@derf.homelinux.org>2010-01-09 15:14:06 +0100
commit7de76ee5da413f5bd4f7ad227c1fdec10863ca9d (patch)
tree9a4dec95bfdae37ab60705384a7a17f034dace94
parent12f4b49bb5431ac9e8e5759a78d41dd5fc3c5385 (diff)
apt-why: Minor source style fix
-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;
}