jmq/Documentation
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

prt-auf: fixed sysup() subroutine

Browse Source
This commit is contained in:
John McQuah 2022-06-11 08:56:25 -04:00
parent 6162bf44d9
commit ad1e299f4a
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
scripts/prt-auf
View File

@ -643,11 +643,11 @@ sub up_inst { # returns scalar references to five arrays;
@targets = grep { (join " ", @allports) =~ / $_ / } @targets if ($type eq "grpinst");
# exempt any locked ports from an sysup operation
%EXEMPT = map { $_ => 0 } @LOCKED;
%EXEMPT = map { $_ => 1 } @LOCKED;
%WANTED = map { $_ => 1 } @requested;
if ($action eq "sysup") { @targets = grep {defined $EXEMPT{$_}} @targets;
if ($action eq "sysup") { @targets = grep {! $EXEMPT{$_}} @targets;
} else {
@targets = grep {(defined $EXEMPT{$_}) or (defined $WANTED{$_})} @targets;
@targets = grep {(! $EXEMPT{$_}) or ($WANTED{$_})} @targets;
}
# first determine the directories from which pkgmk must be called