summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarc Espie <espie@cvs.openbsd.org>2012-04-16 10:32:06 +0000
committerMarc Espie <espie@cvs.openbsd.org>2012-04-16 10:32:06 +0000
commit88c205a33af3e9431d6efda5086e429224f99ee2 (patch)
tree606d500875b92d59b7be95b93131cee2c0582c28
parentba2ceace26fd5b554161d38fb2cf04d298e98602 (diff)
display truely unknown stuff first
-rw-r--r--usr.sbin/pkg_add/OpenBSD/PkgCheck.pm12
1 files changed, 7 insertions, 5 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PkgCheck.pm b/usr.sbin/pkg_add/OpenBSD/PkgCheck.pm
index 2a875a4b480..861f2bb1baf 100644
--- a/usr.sbin/pkg_add/OpenBSD/PkgCheck.pm
+++ b/usr.sbin/pkg_add/OpenBSD/PkgCheck.pm
@@ -1,7 +1,7 @@
#! /usr/bin/perl
# ex:ts=8 sw=4:
-# $OpenBSD: PkgCheck.pm,v 1.34 2012/04/16 10:29:53 espie Exp $
+# $OpenBSD: PkgCheck.pm,v 1.35 2012/04/16 10:32:05 espie Exp $
#
# Copyright (c) 2003-2010 Marc Espie <espie@openbsd.org>
#
@@ -484,16 +484,18 @@ sub result
my $r = $self->{result};
my $u = $r->{unknown};
delete $r->{unknown};
+
+ $state->say("Not found:");
+ for my $e (sort @$u) {
+ $state->say("\t#1", $e);
+ }
+
for my $k (sort keys %{$r}) {
$state->say("In #1:", $k);
for my $e (sort @{$r->{$k}}) {
$state->say("\t#1", $e);
}
}
- $state->say("Not found:");
- for my $e (sort @$u) {
- $state->say("\t#1", $e);
- }
}
package OpenBSD::PkgCheck;