From 52217bb3947c3adb02cf161bec210cee45b70fc1 Mon Sep 17 00:00:00 2001 From: justme1968 Date: Mon, 3 Nov 2014 18:24:57 +0000 Subject: [PATCH] 38_netatmo.pm: plz hast to have exactly 5 digits. (http://forum.fhem.de/index.php/topic,14457.msg214608.html#msg214608) git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@6876 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/38_netatmo.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fhem/FHEM/38_netatmo.pm b/fhem/FHEM/38_netatmo.pm index 3fe425bf2..8cd97317d 100644 --- a/fhem/FHEM/38_netatmo.pm +++ b/fhem/FHEM/38_netatmo.pm @@ -928,7 +928,7 @@ netatmo_Get($$@) my $station; $station = shift @args if( $args[0] && $args[0] =~ m/[\da-f]{2}(:[\da-f]{2}){5}/ ); - if( $args[0] && ( $args[0] =~ m/\d{5}/ + if( $args[0] && ( $args[0] =~ m/^\d{5}$/ || $args[0] =~ m/^a:/ ) ) { my $addr = shift @args; $addr = substr($addr,2) if( $addr =~ m/^a:/ );