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

ENIGMA2: allow direct sending of integer remoteControl commands

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@7206 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
loredo
2014-12-14 12:25:35 +00:00
parent 193c5256b7
commit 4259c82dc3
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
fhem/FHEM/70_ENIGMA2.pm
View File

@@ -519,6 +519,8 @@ sub ENIGMA2_Set($@) {
}
my $request = ENIGMA2_GetRemotecontrolCommand( uc( $a[2] ) );
$request = $a[2]
if ( $request eq "" && $a[2] =~ /^\d+$/ );
if ( uc( $a[2] ) eq "POWER" ) {
return ENIGMA2_Set( $hash, $name, "toggle" );
@@ -527,7 +529,7 @@ sub ENIGMA2_Set($@) {
return ENIGMA2_Set( $hash, $name, "mute" );
}
elsif ( $request ne "" ) {
$cmd = "command=" . ENIGMA2_GetRemotecontrolCommand( $a[2] );
$cmd = "command=" . $request;
$cmd .= "&rcu=" . $attr{$name}{remotecontrol}
if defined( $attr{$name}{remotecontrol} );
$cmd .= "&type=long"