From f22f1ec0171f2eb749ea45b2fc39e4442371c77d Mon Sep 17 00:00:00 2001 From: borisneubert Date: Wed, 26 Dec 2012 10:18:00 +0000 Subject: [PATCH] fix for hex addresses git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@2364 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/10_OWServer.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fhem/FHEM/10_OWServer.pm b/fhem/FHEM/10_OWServer.pm index 4977ab733..b38f9abde 100644 --- a/fhem/FHEM/10_OWServer.pm +++ b/fhem/FHEM/10_OWServer.pm @@ -177,7 +177,7 @@ OWServer_Get($@) if($cmd eq "devices") { my @dir= split(",", $owserver->dir()); - my @devices= grep { m/^\/\d\d\.\d+$/ } @dir; + my @devices= grep { m/^\/[0-9a-f]{2}.[0-9a-f]{12}$/i } @dir; my $ret; for my $device (@devices) { $ret .= substr($device,1) . " " . $owserver->read($device . "/type") . "\n";