From 06a14d7331bde33121b46d4d585489aa63e80f92 Mon Sep 17 00:00:00 2001 From: John McQuah Date: Sat, 1 Oct 2022 21:00:39 -0400 Subject: [PATCH] prt-auf: suppress the missing packages report at the end of quickdep output --- scripts/prt-auf | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scripts/prt-auf b/scripts/prt-auf index d6d84e9..90e7b66 100755 --- a/scripts/prt-auf +++ b/scripts/prt-auf @@ -641,7 +641,7 @@ sub deporder { @outfile = grep !$seen{$_}++, (grep { s/0 //g; s/ .provided by .*//g; !m/^\s*$/; } sort(@outfile)); } - return @outfile unless ($#missing >= 0); + return @outfile if (($#missing < 0) or ($format eq "quickdep")); return @outfile, "MISSING", @missing if ($#missing >= 0); } @@ -659,8 +659,8 @@ sub up_inst { # returns scalar references to five arrays # resolve all dependencies unless the command was 'grpinst' my @targets=($type eq "grpinst") ? @_ : deporder("quickdep",@_); - # filter out the invalid ports - @targets = grep { ($V_REPO{$_}) } @targets; + # filter out the invalid ports if deporder did not already do so + @targets = grep { ($V_REPO{$_}) } @targets if ($type eq "grpinst"); # exempt any locked ports from an update operation %EXEMPT = map { $_ => 1 } @LOCKED;