FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-16 23:06:05 +00:00
Code Issues Releases Wiki Activity

ENIGMA2: allow direct sending of integer remoteControl commands

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7206 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jpawlowski 2014-12-14 12:25:35 +00:00
parent d55db9b8b9
commit 16f3529f76
1 changed files with 3 additions and 1 deletions
Show Stats 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] ) ); my $request = ENIGMA2_GetRemotecontrolCommand( uc( $a[2] ) );
$request = $a[2]
if ( $request eq "" && $a[2] =~ /^\d+$/ );
if ( uc( $a[2] ) eq "POWER" ) { if ( uc( $a[2] ) eq "POWER" ) {
return ENIGMA2_Set( $hash, $name, "toggle" ); return ENIGMA2_Set( $hash, $name, "toggle" );
@ -527,7 +529,7 @@ sub ENIGMA2_Set($@) {
return ENIGMA2_Set( $hash, $name, "mute" ); return ENIGMA2_Set( $hash, $name, "mute" );
} }
elsif ( $request ne "" ) { elsif ( $request ne "" ) {
$cmd = "command=" . ENIGMA2_GetRemotecontrolCommand( $a[2] ); $cmd = "command=" . $request;
$cmd .= "&rcu=" . $attr{$name}{remotecontrol} $cmd .= "&rcu=" . $attr{$name}{remotecontrol}
if defined( $attr{$name}{remotecontrol} ); if defined( $attr{$name}{remotecontrol} );
$cmd .= "&type=long" $cmd .= "&type=long"