2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-20 13:26:02 +00:00

10_pilight_ctrl.pm: FIX: PERL WARNING: Subroutine from Blocking.pm redefined

git-svn-id: https://svn.fhem.de/fhem/trunk@12188 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
risiko79 2016-09-20 18:07:36 +00:00
parent 64c1e44cb6
commit b63b9a0ee5

View File

@ -43,6 +43,7 @@
# V 1.16 2016-06-02 - NEW: protocol oregon_21 (temp)
# V 1.17 2016-06-28 - FIX: Experimental splice on scalar is now forbidden - use explizit array notation
# V 1.18 2016-06-28 - NEW: support smoke sensors (protocol: secudo_smoke_sensor)
# V 1.19 2016-09-20 - FIX: PERL WARNING: Subroutine from Blocking.pm redefined
##############################################
package main;
@ -52,6 +53,9 @@ use Time::HiRes qw(gettimeofday);
use JSON; #libjson-perl
use Switch; #libswitch-perl
require 'DevIo.pm';
require 'Blocking.pm';
sub pilight_ctrl_Parse($$);
sub pilight_ctrl_Read($);
sub pilight_ctrl_Ready($);
@ -85,9 +89,6 @@ sub pilight_ctrl_Initialize($)
{
my ($hash) = @_;
require "$attr{global}{modpath}/FHEM/DevIo.pm";
require "$attr{global}{modpath}/FHEM/Blocking.pm";
$hash->{ReadFn} = "pilight_ctrl_Read";
$hash->{WriteFn} = "pilight_ctrl_Write";
$hash->{ReadyFn} = "pilight_ctrl_Ready";
@ -932,6 +933,8 @@ sub pilight_ctrl_SimpleWrite(@)
1;
=pod
=item summary base module to comunicate with pilight
=item summary_DE Basismodul zur Kommunikation mit pilight
=begin html
<a name="pilight_ctrl"></a>