prt-auf: accommodate inconsistent whitespace in the list of dependencies
This commit is contained in:
parent
1238b5f152
commit
badb7373bb
@ -116,7 +116,7 @@ if (($action =~ /^(listinst|listorphans)/)
|
|||||||
my $cleandep = $depline;
|
my $cleandep = $depline;
|
||||||
$cleandep =~ s/ .provided by .*// if ($action eq "deptree");
|
$cleandep =~ s/ .provided by .*// if ($action eq "deptree");
|
||||||
$dep = (split / /, $cleandep)[-1];
|
$dep = (split / /, $cleandep)[-1];
|
||||||
next if (($seen{$dep}) and ($odepends{all}==0));
|
next if ((! $dep) or (($seen{$dep}) and ($odepends{all}==0)));
|
||||||
$seen{$dep}=1;
|
$seen{$dep}=1;
|
||||||
if ($action ne "quickdep") {
|
if ($action ne "quickdep") {
|
||||||
$ind = (grep { $_ eq $dep } @installed) ? "[i]" : "[ ]";
|
$ind = (grep { $_ eq $dep } @installed) ? "[i]" : "[ ]";
|
||||||
|
Loading…
Reference in New Issue
Block a user