From eda2bc76baf8c803c1c75450b26245b739dac350 Mon Sep 17 00:00:00 2001
From: hexenmeister <hexenmeister@users.noreply.github.com>
Date: Sun, 28 Jun 2015 19:34:09 +0000
Subject: [PATCH] fix: when cputemp unavailable

git-svn-id: https://svn.fhem.de/fhem/trunk@8856 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/42_SYSMON.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/42_SYSMON.pm b/fhem/FHEM/42_SYSMON.pm
index 7c5519fed..e3e22b92c 100644
--- a/fhem/FHEM/42_SYSMON.pm
+++ b/fhem/FHEM/42_SYSMON.pm
@@ -29,6 +29,7 @@ package main;
 
 use strict;
 use warnings;
+use Scalar::Util qw(looks_like_number);
 
 use Blocking;
 
@@ -37,7 +38,7 @@ use Data::Dumper;
 my $missingModulRemote;
 eval "use Net::Telnet;1" or $missingModulRemote .= "Net::Telnet ";
 
-my $VERSION = "2.2.2";
+my $VERSION = "2.2.4";
 
 use constant {
   PERL_VERSION    => "perl_version",
@@ -1755,6 +1756,8 @@ SYSMON_getCPUTemp_BBB($$) {
   if($hash->{helper}->{excludes}{'cputemp'}) {return $map;}
   
   my $val = SYSMON_execute($hash, "cat /sys/class/hwmon/hwmon0/device/temp1_input 2>&1");
+  if(!looks_like_number($val)) {return $map;}
+  
   $val = int($val);
   my $val_txt = sprintf("%.2f", $val/1000);
   $map->{+CPU_TEMP}="$val_txt";