diff options
author | Daniel Friesel <derf@derf.homelinux.org> | 2010-05-09 11:03:08 +0200 |
---|---|---|
committer | Daniel Friesel <derf@derf.homelinux.org> | 2010-05-09 11:03:08 +0200 |
commit | bc7d0ee56faa7443a8e731ca1bf0bbd504c45f6c (patch) | |
tree | a26c457abf29a2cf0a37090cf6cb30df0a9ea516 /bin | |
parent | c1f6c1c189de5ea5b9395c0c259fef9a3c7829d9 (diff) |
Remove --tabwidth option
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/apt-why | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/bin/apt-why b/bin/apt-why index fcf2486..e6a622e 100755 --- a/bin/apt-why +++ b/bin/apt-why @@ -10,7 +10,6 @@ use Getopt::Long; my $cache = AptPkg::Cache->new; my $max_depth = 5; my $all = 0; -my $tabsign = "\t"; my @deptypes = qw/Depends Recommends Suggests/; my @known; @@ -41,7 +40,7 @@ sub recurse { my $name = shift; my $depth = (shift) + 1; - printf( "%s%s\n", $tabsign x ( $depth - 1 ), $name ); + printf( "%s%s\n", "\t" x ( $depth - 1 ), $name ); if ( $depth >= $max_depth ) { return; @@ -58,7 +57,6 @@ GetOptions( 'all!' => \$all, 'deptype=s' => sub { @deptypes = split( /,/, $_[1] ) }, 'depth=i' => \$max_depth, - 'tabwidth=i' => sub { $tabsign = q{ } x $_[1] }, 'h|?|help' => sub { exec( 'perldoc', '-F', $0 ) or die("See perldoc -F $0\n") }, ); @@ -108,10 +106,6 @@ Specify the maximum recursion depth Only show reverse dependencies which mach the specified I<types> (comma separated list). Right now, possible types are Depends, Suggests, Recommends. -=item B<--tabwidth>=I<i> - -Indent each recursion level with I<i> spaces (by default: one tab) - =back =head1 EXIT STATUS |