===================================================================
RCS file: /cvs/nagios/check_hw_sensors/check_hw_sensors,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -r1.22 -r1.23
--- nagios/check_hw_sensors/check_hw_sensors	2007/01/06 03:16:41	1.22
+++ nagios/check_hw_sensors/check_hw_sensors	2007/01/22 02:38:35	1.23
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $RedRiver: check_hw_sensors,v 1.21 2006/12/05 16:26:27 andrew Exp $
+# $RedRiver: check_hw_sensors,v 1.22 2007/01/06 03:16:41 andrew Exp $
 ########################################################################
 # check_hw_sensors *** A nagios check for OpenBSD hw.sensors
 # 
@@ -117,7 +117,7 @@
 }
 
 if ($opt_V) {
-	print_revision($PROGNAME,'$Revision: 1.22 $ ');
+	print_revision($PROGNAME,'$Revision: 1.23 $ ');
 	exit $ERRORS{'OK'};
 }
 
@@ -163,8 +163,10 @@
 
 	if (@s == 4) { # XXX This mebbe needs to end up $OSVer >= 4.1
 		$data   = $o[0];
-		$descr =~ s/^\(|\)$//g;
-		$status = $o[2];
+		if ($data =~ s/\s+\((.*)\).*$//) {
+			$descr = $1;
+		}
+		$status = $o[1];
 		($source, $type) = $id =~ /([^\.]+)\.([^\.]+)\d+$/;
 	} elsif ($OSVer >= 4.0) {
 		$data   = $o[2];
@@ -327,6 +329,7 @@
 	$result = 'OK';
 	foreach my $code ('warn', 'crit') {
 		if (
+			$sensor->{'type'} eq 'fan'      ||
 			$sensor->{'type'} eq 'fanrpm'   ||
 			$sensor->{'type'} eq 'volt'     ||
 			$sensor->{'type'} eq 'volts_dc' ||
@@ -563,6 +566,6 @@
 
 EOL
 
-        print_revision($PROGNAME, '$Revision: 1.22 $');
+        print_revision($PROGNAME, '$Revision: 1.23 $');
 }