FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 10:46:53 +00:00
Code Issues Releases Wiki Activity

ONKYO_AVR: case-insensitive set commands, muteT as alias for mute

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7730 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jpawlowski 2015-01-26 09:35:00 +00:00
parent 4e3f133a4e
commit 86840a845f
1 changed files with 13 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
fhem/FHEM/70_ONKYO_AVR.pm
View File

@ -693,14 +693,14 @@ sub ONKYO_AVR_Set($@) {
readingsBeginUpdate($hash);
# statusRequest
if ( $a[1] eq "statusRequest" || $a[1] eq "statusrequest" ) {
if ( lc($a[1]) eq "statusRequest" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1];
delete $hash->{helper}{receiver} if ( $state ne "absent" );
ONKYO_AVR_GetStatus( $hash, 1 ) if ( !defined( $a[2] ) );
}
# toggle
elsif ( $a[1] eq "toggle" ) {
elsif ( lc($a[1]) eq "toggle" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{power}{VAL} eq "off" ) {
@ -712,7 +712,7 @@ sub ONKYO_AVR_Set($@) {
}
# on
elsif ( $a[1] eq "on" ) {
elsif ( lc($a[1]) eq "on" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{state}{VAL} eq "absent" ) {
@ -738,7 +738,7 @@ sub ONKYO_AVR_Set($@) {
}
# off
elsif ( $a[1] eq "off" ) {
elsif ( lc($a[1]) eq "off" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{state}{VAL} eq "absent" ) {
@ -764,7 +764,7 @@ sub ONKYO_AVR_Set($@) {
}
# sleep
elsif ( $a[1] eq "sleep" && $zone eq "main" ) {
elsif ( lc($a[1]) eq "sleep" && $zone eq "main" ) {
if ( !defined( $a[2] ) ) {
$return = "No argument given, choose one of minutes off";
}
@ -802,7 +802,7 @@ sub ONKYO_AVR_Set($@) {
}
# mute
elsif ( $a[1] eq "mute" ) {
elsif ( lc($a[1]) eq "mute" || lc($a[1]) eq "mutet" ) {
if ( defined( $a[2] ) ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1] . " " . $a[2];
}
@ -814,10 +814,10 @@ sub ONKYO_AVR_Set($@) {
if ( !defined( $a[2] ) || $a[2] eq "toggle" ) {
$result = ONKYO_AVR_SendCommand( $hash, "mute", "toggle" );
}
elsif ( $a[2] eq "off" ) {
elsif ( lc($a[2]) eq "off" ) {
$result = ONKYO_AVR_SendCommand( $hash, "mute", "off" );
}
elsif ( $a[2] eq "on" ) {
elsif ( lc($a[2]) eq "on" ) {
$result = ONKYO_AVR_SendCommand( $hash, "mute", "on" );
}
else {
@ -838,7 +838,7 @@ sub ONKYO_AVR_Set($@) {
}
# volume
elsif ( $a[1] eq "volume" ) {
elsif ( lc($a[1]) eq "volume" ) {
if ( !defined( $a[2] ) ) {
$return = "No argument given";
}
@ -879,11 +879,11 @@ sub ONKYO_AVR_Set($@) {
}
# volumeUp/volumeDown
elsif ( $a[1] =~ /^(volumeUp|volumeDown)$/ ) {
elsif ( lc($a[1]) =~ /^(volumeup|volumedown)$/ ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{state}{VAL} eq "on" ) {
if ( $a[1] eq "volumeUp" ) {
if ( lc($a[1]) eq "volumeup" ) {
$result = ONKYO_AVR_SendCommand( $hash, "volume", "level-up" );
}
else {
@ -905,7 +905,7 @@ sub ONKYO_AVR_Set($@) {
}
# input
elsif ( $a[1] eq "input" ) {
elsif ( lc($a[1]) eq "input" ) {
if ( !defined( $a[2] ) ) {
$return = "No input given";
}
@ -935,7 +935,7 @@ sub ONKYO_AVR_Set($@) {
}
# remoteControl
elsif ( $a[1] eq "remoteControl" || $a[1] eq "remotecontrol" ) {
elsif ( lc($a[1]) eq "remotecontrol" ) {
# Reading commands for zone from HASH table
my $commands = ONKYOdb::ONKYO_GetRemotecontrolCommand($zone);