From d148386558e07e6b1687b1479add4eb0c136263c Mon Sep 17 00:00:00 2001 From: wuehler Date: Wed, 18 Jul 2018 10:48:39 +0000 Subject: [PATCH] 74_Unifi: Minor loglevel-bugfix git-svn-id: https://svn.fhem.de/fhem/trunk@17001 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/74_Unifi.pm | 6 +++++- fhem/FHEM/74_UnifiSwitch.pm | 2 +- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/74_Unifi.pm b/fhem/FHEM/74_Unifi.pm index 62f3eb67a..ae33f6136 100644 --- a/fhem/FHEM/74_Unifi.pm +++ b/fhem/FHEM/74_Unifi.pm @@ -33,9 +33,12 @@ # - feature: 74_Unifi: block clients by mac-address # V 3.0.2 # - fixed: 74_Unifi: Minor bugfix in notify-function +# V 3.0.3 +# - fixed: 74_Unifi: Minor loglevel-bugfix package main; +my $version="3.0.3"; use strict; use warnings; use HttpUtils; @@ -166,6 +169,7 @@ sub Unifi_Define($$) { sslargs => { SSL_verify_mode => 0 }, }; + $hash->{VERSION}=$version; my $username = Unifi_encrypt($a[4]); my $password = Unifi_encrypt($a[5]); $hash->{helper}{username} = $username; @@ -728,7 +732,7 @@ sub Unifi_Write($$){ my ( $hash, $type, $ap_id, $port_overrides) = @_; #TODO: ap_id und port_overrides in @a, damit es für andere $type auch geht. my ($name,$self) = ($hash->{NAME},Unifi_Whoami()); - Log3 $name, 1, "$name ($self) - executed with ".$type; + Log3 $name, 5, "$name ($self) - executed with ".$type; if($type eq "Unifi_RestJson_Send"){ Unifi_RestJson_Send($hash, $ap_id, {port_overrides => $port_overrides }); } diff --git a/fhem/FHEM/74_UnifiSwitch.pm b/fhem/FHEM/74_UnifiSwitch.pm index c0445c827..1028277f1 100755 --- a/fhem/FHEM/74_UnifiSwitch.pm +++ b/fhem/FHEM/74_UnifiSwitch.pm @@ -22,6 +22,7 @@ # - state des USW korrekt setzen (aktuell nur connected und provisioning) package main; +my $version="0.92"; # Laden evtl. abhängiger Perl- bzw. FHEM-Module use strict; use warnings; @@ -39,7 +40,6 @@ sub UnifiSwitch_Parse($$); sub UnifiSwitch_Whoami(); sub UnifiSwitch_Whowasi(); -my $version="0.91"; sub UnifiSwitch_Initialize($$) { my ($hash) = @_;