mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

revert last checkin

Browse Source 
real fix for cmdline parsing


git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5673 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme1968
2014-04-26 19:19:53 +00:00
parent e8e6e8c773
commit 4d3fdab4c6
1 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
fhem/FHEM/33_readingsProxy.pm
View File

@@ -52,10 +52,19 @@ readingsProxy_updateDevices($)
delete $hash->{READING};
my @params = split(" ", $hash->{DEF});
if( defined($defs{$params[0]}) ) {
$list{$params[0]} = 1;
$hash->{DEVICE} = $params[0];
$hash->{READING} = $params[1];
while (@params) {
my $param = shift(@params);
my @device = split(":", $param);
if( defined($defs{$device[0]})
&& defined($defs{$device[0]}) ) {
$list{$device[0]} = 1;
$hash->{DEVICE} = $device[0];
$hash->{READING} = $device[1];
$hash->{READING} = "state" if( !$hash->{READING} );
}
}
$hash->{CONTENT} = \%list;
@@ -69,7 +78,7 @@ sub readingsProxy_Define($$)
my @args = split("[ \t]+", $def);
return "Usage: define <name> readingsProxy <device>+" if(@args < 3);
return "Usage: define <name> readingsProxy <device>:<reading>" if(@args != 3);
my $name = shift(@args);
my $type = shift(@args);