FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-20 13:26:02 +00:00
Code Issues Releases Wiki Activity

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

Browse Source 
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
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fhem/FHEM/10_pilight_ctrl.pm
View File

@ -43,6 +43,7 @@
# V 1.16 2016-06-02 - NEW: protocol oregon_21 (temp) # 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.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.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; package main;
@ -52,6 +53,9 @@ use Time::HiRes qw(gettimeofday);
use JSON; #libjson-perl use JSON; #libjson-perl
use Switch; #libswitch-perl use Switch; #libswitch-perl
require 'DevIo.pm';
require 'Blocking.pm';
sub pilight_ctrl_Parse($$); sub pilight_ctrl_Parse($$);
sub pilight_ctrl_Read($); sub pilight_ctrl_Read($);
sub pilight_ctrl_Ready($); sub pilight_ctrl_Ready($);
@ -85,9 +89,6 @@ sub pilight_ctrl_Initialize($)
{ {
my ($hash) = @_; my ($hash) = @_;
require "$attr{global}{modpath}/FHEM/DevIo.pm";
require "$attr{global}{modpath}/FHEM/Blocking.pm";
$hash->{ReadFn} = "pilight_ctrl_Read"; $hash->{ReadFn} = "pilight_ctrl_Read";
$hash->{WriteFn} = "pilight_ctrl_Write"; $hash->{WriteFn} = "pilight_ctrl_Write";
$hash->{ReadyFn} = "pilight_ctrl_Ready"; $hash->{ReadyFn} = "pilight_ctrl_Ready";
@ -932,6 +933,8 @@ sub pilight_ctrl_SimpleWrite(@)
1; 1;
=pod =pod
=item summary base module to comunicate with pilight
=item summary_DE Basismodul zur Kommunikation mit pilight
=begin html =begin html
<a name="pilight_ctrl"></a> <a name="pilight_ctrl"></a>