From 0f9fb54796d48eb8767aaa1bcc9f80861fe252b2 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@derf.homelinux.org>
Date: Mon, 22 Jun 2009 07:44:59 +0200
Subject: apt-why: --deptype: Don't shift around

---
 bin/apt-why | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'bin')

diff --git a/bin/apt-why b/bin/apt-why
index 69802bf..20abd5c 100755
--- a/bin/apt-why
+++ b/bin/apt-why
@@ -14,7 +14,7 @@ my $all = 0;
 my @deptypes = ('Depends', 'Recommends', 'Suggests');
 GetOptions(
 	'all!' => \$all,
-	'deptype=s' => sub {shift; @deptypes = split(/,/, shift)},
+	'deptype=s' => sub {@deptypes = split(/,/, $_[1])},
 	'depth=i' => \$max_depth,
 	'h|?|help' => \&usage,
 );
-- 
cgit v1.2.3