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

prt-auf: provide a post-transaction report for sysup too

This commit is contained in:
John McQuah 2022-06-21 06:39:20 -04:00
parent a9d28989f1
commit 46ded7d692
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
scripts/prt-auf
View File

@ -143,7 +143,7 @@ if (($action =~ /^(listinst|listorphans)/)
my @failures = grep { $removed{$_}==0 } keys %removed;
print "Ports removed:\n" if (@successes);
foreach my $p (@successes) { print "$p\n"; }
} elsif ($action =~ /^(install|update|depinst|grpinst)$/) {
} elsif ($action =~ /^(install|update|depinst|grpinst|sysup)$/) {
my @ok = @{$results[0]}; my @ok_pre = @{$results[1]}; my @ok_post = @{$results[2]};
my @ok_readme = @{$results[3]}; my @not_ok = @{$results[4]}; my $note;
if (($opkg{test} eq "no") and (@ok)) {
@ -734,7 +734,7 @@ sub up_inst { # returns scalar references to five arrays
sub sysup {
my @targets; my $v_repo;
foreach my $p (keys %V_INST) {
next if grep /$p/, @LOCKED;
next if grep /^$p$/, @LOCKED;
$v_repo = ($V_REPO{$p}) ? $V_REPO{$p} : "MISSING" ;
push @targets, $p if (($v_repo ne $V_INST{$p}) and ($v_repo ne "MISSING"));
}