fix for hex addresses

git-svn-id: https://svn.fhem.de/fhem/trunk@2364 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
borisneubert
2012-12-26 10:18:00 +00:00
parent 22f702f4e4
commit 271b94bda4

View File

@@ -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";