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

ONKYO_AVR: increase log levels

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@8117 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
loredo
2015-03-01 13:05:22 +00:00
parent 9a71ee9f42
commit 0f28def3d3
1 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
fhem/FHEM/70_ONKYO_AVR.pm
View File

@@ -694,14 +694,14 @@ sub ONKYO_AVR_Set($@) {
# statusRequest # statusRequest
if ( lc($a[1]) eq "statusRequest" ) { if ( lc($a[1]) eq "statusRequest" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1];
delete $hash->{helper}{receiver} if ( $state ne "absent" ); delete $hash->{helper}{receiver} if ( $state ne "absent" );
ONKYO_AVR_GetStatus( $hash, 1 ) if ( !defined( $a[2] ) ); ONKYO_AVR_GetStatus( $hash, 1 ) if ( !defined( $a[2] ) );
} }
# toggle # toggle
elsif ( lc($a[1]) eq "toggle" ) { elsif ( lc($a[1]) eq "toggle" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{power}{VAL} eq "off" ) { if ( $hash->{READINGS}{power}{VAL} eq "off" ) {
$return = ONKYO_AVR_Set( $hash, $name, "on" ); $return = ONKYO_AVR_Set( $hash, $name, "on" );
@@ -713,7 +713,7 @@ sub ONKYO_AVR_Set($@) {
# on # on
elsif ( lc($a[1]) eq "on" ) { elsif ( lc($a[1]) eq "on" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{state}{VAL} eq "absent" ) { if ( $hash->{READINGS}{state}{VAL} eq "absent" ) {
$return = $return =
@@ -739,7 +739,7 @@ sub ONKYO_AVR_Set($@) {
# off # off
elsif ( lc($a[1]) eq "off" ) { elsif ( lc($a[1]) eq "off" ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{state}{VAL} eq "absent" ) { if ( $hash->{READINGS}{state}{VAL} eq "absent" ) {
$return = $return =
@@ -769,7 +769,7 @@ sub ONKYO_AVR_Set($@) {
$return = "No argument given, choose one of minutes off"; $return = "No argument given, choose one of minutes off";
} }
else { else {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1] . " " . $a[2]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1] . " " . $a[2];
if ( $hash->{READINGS}{state}{VAL} eq "absent" ) { if ( $hash->{READINGS}{state}{VAL} eq "absent" ) {
$return = $return =
@@ -804,10 +804,10 @@ sub ONKYO_AVR_Set($@) {
# mute # mute
elsif ( lc($a[1]) eq "mute" || lc($a[1]) eq "mutet" ) { elsif ( lc($a[1]) eq "mute" || lc($a[1]) eq "mutet" ) {
if ( defined( $a[2] ) ) { if ( defined( $a[2] ) ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1] . " " . $a[2]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1] . " " . $a[2];
} }
else { else {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1];
} }
if ( $hash->{READINGS}{state}{VAL} eq "on" ) { if ( $hash->{READINGS}{state}{VAL} eq "on" ) {
@@ -843,7 +843,7 @@ sub ONKYO_AVR_Set($@) {
$return = "No argument given"; $return = "No argument given";
} }
else { else {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1] . " " . $a[2]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1] . " " . $a[2];
if ( $hash->{READINGS}{state}{VAL} eq "on" ) { if ( $hash->{READINGS}{state}{VAL} eq "on" ) {
my $_ = $a[2]; my $_ = $a[2];
@@ -880,7 +880,7 @@ sub ONKYO_AVR_Set($@) {
# volumeUp/volumeDown # volumeUp/volumeDown
elsif ( lc($a[1]) =~ /^(volumeup|volumedown)$/ ) { elsif ( lc($a[1]) =~ /^(volumeup|volumedown)$/ ) {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1];
if ( $hash->{READINGS}{state}{VAL} eq "on" ) { if ( $hash->{READINGS}{state}{VAL} eq "on" ) {
if ( lc($a[1]) eq "volumeup" ) { if ( lc($a[1]) eq "volumeup" ) {
@@ -910,7 +910,7 @@ sub ONKYO_AVR_Set($@) {
$return = "No input given"; $return = "No input given";
} }
else { else {
Log3 $name, 2, "ONKYO_AVR set $name " . $a[1] . " " . $a[2]; Log3 $name, 3, "ONKYO_AVR set $name " . $a[1] . " " . $a[2];
if ( $hash->{READINGS}{power}{VAL} eq "off" ) { if ( $hash->{READINGS}{power}{VAL} eq "off" ) {
$return = ONKYO_AVR_Set( $hash, $name, "on" ); $return = ONKYO_AVR_Set( $hash, $name, "on" );
@@ -1025,7 +1025,7 @@ sub ONKYO_AVR_Set($@) {
# normal processing # normal processing
else { else {
Log3 $name, 2, Log3 $name, 3,
"ONKYO_AVR set $name " "ONKYO_AVR set $name "
. $a[1] . " " . $a[1] . " "
. $a[2] . " " . $a[2] . " "
@@ -1568,8 +1568,8 @@ sub ONKYO_AVR_RCmakenotify($$) {
my $nname = "notify_$name"; my $nname = "notify_$name";
fhem( "define $nname notify $name set $ndev remoteControl " . '$EVENT', 1 ); fhem( "define $nname notify $name set $ndev remoteControl " . '$EVENT', 1 );
Log3 $name, 2, "remotecontrol Notify for $ndev created: $nname"; Log3 undef, 2, "[remotecontrol:ONKYO_AVR] Notify created: $nname";
return undef; return "Notify created by ENIGMA2: $nname";
} }
##################################### #####################################