===================================================================
RCS file: /cvs/nagios/check_hw_sensors/check_hw_sensors,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -r1.24 -r1.25
--- nagios/check_hw_sensors/check_hw_sensors	2007/02/14 21:59:10	1.24
+++ nagios/check_hw_sensors/check_hw_sensors	2008/03/10 17:21:53	1.25
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $RedRiver: check_hw_sensors,v 1.23 2007/01/22 02:38:35 andrew Exp $
+# $RedRiver: check_hw_sensors,v 1.24 2007/02/14 21:59:10 andrew Exp $
 ########################################################################
 # check_hw_sensors *** A nagios check for OpenBSD hw.sensors
 # 
@@ -118,7 +118,7 @@
 }
 
 if ($opt_V) {
-	print_revision($PROGNAME,'$Revision: 1.24 $ ');
+	print_revision($PROGNAME,'$Revision: 1.25 $ ');
 	exit $ERRORS{'OK'};
 }
 
@@ -162,13 +162,13 @@
 	$source = $o[0];
 	$descr  = $o[1];
 
-	if (@s == 4) { # XXX This mebbe needs to end up $OSVer >= 4.1
+	if ($OSVer >= 4.1) {
 		$data   = $o[0];
 		if ($data =~ s/\s+\((.*)\).*$//) {
 			$descr = $1;
 		}
 		$status = $o[1];
-		($source, $type) = $id =~ /([^\.]+)\.([^\.]+)\d+$/;
+		($source, $type) = $id =~ /([^\.]+)\.([^\.]+?)\d+$/;
 	} elsif ($OSVer >= 4.0) {
 		$data   = $o[2];
 		$status = $o[3];
@@ -567,6 +567,6 @@
 
 EOL
 
-        print_revision($PROGNAME, '$Revision: 1.24 $');
+        print_revision($PROGNAME, '$Revision: 1.25 $');
 }