summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
Diffstat (limited to 'bin')
-rwxr-xr-xbin/apt-why8
1 files changed, 4 insertions, 4 deletions
diff --git a/bin/apt-why b/bin/apt-why
index 9276471..bcec4e9 100755
--- a/bin/apt-why
+++ b/bin/apt-why
@@ -15,7 +15,7 @@ my @deptypes = qw/Depends Recommends Suggests/;
my @known;
sub usage {
- exec('perldoc', '-F', $0) or die("See perldoc -F $0");
+ exec('perldoc', '-F', $0) or die("See perldoc -F $0\n");
}
sub revdeps {
@@ -27,9 +27,9 @@ sub revdeps {
foreach my $dependency (@{$rdeps}) {
if (
not $dependency->{ParentPkg}{Name} ~~ @known
- and ($all or $cache->{$dependency->{ParentPkg}{Name}}->{CurrentState} eq 'Installed')
- and "$dependency->{DepType}" ~~ @deptypes
- ) {
+ and ($all or $cache->{ $dependency->{ParentPkg}{Name} }->{CurrentState} eq 'Installed')
+ and "$dependency->{DepType}" ~~ @deptypes )
+ {
push(@return, $dependency->{ParentPkg}{Name});
}
}