diff --git a/FHEM/00_MAXLAN.pm b/FHEM/00_MAXLAN.pm index 30df5a13e..e746ae87e 100755 --- a/FHEM/00_MAXLAN.pm +++ b/FHEM/00_MAXLAN.pm @@ -6,7 +6,6 @@ package main; use strict; use warnings; use MIME::Base64; -use Data::Dumper; use POSIX; sub MAXLAN_Parse($$); @@ -428,7 +427,7 @@ MAXLAN_Parse($$) Dispatch($hash, "MAX,define,$hash->{devices}[-1]->{addr},$device_types{$hash->{devices}[-1]->{type}},$hash->{devices}[-1]->{serial},$hash->{devices}[-1]->{groupid}", {RAWMSG => $rmsg}); } - Log $ll5, "Got Metadata, hash: ".Dumper($hash); + #Log $ll5, "Got Metadata, hash: ".Dumper($hash); }elsif($cmd eq "C"){#Configuration return if(@args < 2); diff --git a/FHEM/10_MAX.pm b/FHEM/10_MAX.pm index c10a12571..ba878b62b 100755 --- a/FHEM/10_MAX.pm +++ b/FHEM/10_MAX.pm @@ -6,7 +6,6 @@ package main; use strict; use warnings; use MIME::Base64; -use Data::Dumper; sub MAX_Define($$); sub MAX_Initialize($); diff --git a/FHEM/14_CUL_MAX.pm b/FHEM/14_CUL_MAX.pm index b477d884a..11d4eac3a 100644 --- a/FHEM/14_CUL_MAX.pm +++ b/FHEM/14_CUL_MAX.pm @@ -5,7 +5,6 @@ package main; use strict; use warnings; -use Data::Dumper; sub CUL_MAX_SendDeviceCmd($$); sub CUL_MAX_Send(@);