===================================================================
RCS file: /cvs/nagios/check_bioctl/check_bioctl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- nagios/check_bioctl/check_bioctl	2006/07/31 21:47:07	1.4
+++ nagios/check_bioctl/check_bioctl	2009/11/09 17:57:32	1.5
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $RedRiver: check_bioctl,v 1.3 2006/07/27 20:34:02 andrew Exp $
+# $RedRiver: check_bioctl,v 1.4 2006/07/31 20:47:07 andrew Exp $
 ########################################################################
 # check_bioctl *** A nagios check for OpenBSD bioctl
 # 
@@ -59,7 +59,7 @@
 }
 
 if ($opt_V) {
-	print_revision($PROGNAME,'$Revision: 1.4 $ ');
+	print_revision($PROGNAME,'$Revision: 1.5 $ ');
 	exit $ERRORS{'OK'};
 }
 
@@ -136,14 +136,11 @@
 }
 
 my $have_results = 0;
-foreach my $error (sort { $ERRORS{$a} <=> $ERRORS{$b} } keys %ERRORS) {
-	if (exists $states{$error}) {
-		$have_results++;
-		$state = $error;
-	}
-}
 foreach my $error (sort { $ERRORS{$b} <=> $ERRORS{$a} } keys %ERRORS) {
 	if (exists $states{$error}) {
+		$have_results++;
+        $state = $error if $ERORRS{$state} < $ERRORS{$error};
+
 		if (NAGIOS_OUTPUT) {
 			print "$error (" . scalar(@{ $states{ $error } }) . ")";
 			unless ($error eq 'OK') {
@@ -174,6 +171,6 @@
 
 EOL
 	
-	print_revision($PROGNAME, '$Revision: 1.4 $');
+	print_revision($PROGNAME, '$Revision: 1.5 $');
 }