From 5b2d8b4af8ed7bc22a5b8fcd68a84b25fa9a62d2 Mon Sep 17 00:00:00 2001 From: jpawlowski Date: Sun, 15 May 2016 15:45:07 +0000 Subject: [PATCH] all my modules: suppress experimental my $_ warning git-svn-id: https://svn.fhem.de/fhem/trunk@11444 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/10_RESIDENTS.pm | 3 +++ fhem/FHEM/20_GUEST.pm | 3 +++ fhem/FHEM/20_ROOMMATE.pm | 3 +++ fhem/FHEM/50_HP1000.pm | 1 + fhem/FHEM/70_ENIGMA2.pm | 1 + fhem/FHEM/70_PHTV.pm | 1 + fhem/FHEM/70_Pushover.pm | 1 + fhem/FHEM/75_MSG.pm | 1 + fhem/FHEM/98_GEOFANCY.pm | 1 + fhem/FHEM/RESIDENTStk.pm | 1 + 10 files changed, 16 insertions(+) diff --git a/fhem/FHEM/10_RESIDENTS.pm b/fhem/FHEM/10_RESIDENTS.pm index 396ae629c..5d8c69736 100644 --- a/fhem/FHEM/10_RESIDENTS.pm +++ b/fhem/FHEM/10_RESIDENTS.pm @@ -32,6 +32,9 @@ use Time::Local; use Data::Dumper; require RESIDENTStk; +no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; + sub RESIDENTS_Set($@); sub RESIDENTS_Define($$); sub RESIDENTS_Notify($$); diff --git a/fhem/FHEM/20_GUEST.pm b/fhem/FHEM/20_GUEST.pm index f627a95fc..f3aaad822 100644 --- a/fhem/FHEM/20_GUEST.pm +++ b/fhem/FHEM/20_GUEST.pm @@ -32,6 +32,9 @@ use Time::Local; use Data::Dumper; require RESIDENTStk; +no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; + sub GUEST_Set($@); sub GUEST_Define($$); sub GUEST_Notify($$); diff --git a/fhem/FHEM/20_ROOMMATE.pm b/fhem/FHEM/20_ROOMMATE.pm index c644574df..6da8198b1 100644 --- a/fhem/FHEM/20_ROOMMATE.pm +++ b/fhem/FHEM/20_ROOMMATE.pm @@ -32,6 +32,9 @@ use Time::Local; use Data::Dumper; require RESIDENTStk; +no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; + sub ROOMMATE_Set($@); sub ROOMMATE_Define($$); sub ROOMMATE_Notify($$); diff --git a/fhem/FHEM/50_HP1000.pm b/fhem/FHEM/50_HP1000.pm index b387ee1d7..591a936a7 100755 --- a/fhem/FHEM/50_HP1000.pm +++ b/fhem/FHEM/50_HP1000.pm @@ -35,6 +35,7 @@ use Data::Dumper; use FHEM::98_dewpoint; no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; sub HP1000_Define($$); sub HP1000_Undefine($$); diff --git a/fhem/FHEM/70_ENIGMA2.pm b/fhem/FHEM/70_ENIGMA2.pm index 20c9dd715..460922567 100644 --- a/fhem/FHEM/70_ENIGMA2.pm +++ b/fhem/FHEM/70_ENIGMA2.pm @@ -36,6 +36,7 @@ use HttpUtils; use Encode; no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; no warnings "all"; diff --git a/fhem/FHEM/70_PHTV.pm b/fhem/FHEM/70_PHTV.pm index 52d823f15..677bb86bd 100644 --- a/fhem/FHEM/70_PHTV.pm +++ b/fhem/FHEM/70_PHTV.pm @@ -39,6 +39,7 @@ use SetExtensions; use Encode; no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; sub PHTV_Set($@); sub PHTV_Get($@); diff --git a/fhem/FHEM/70_Pushover.pm b/fhem/FHEM/70_Pushover.pm index c91d4689a..6abeda4ba 100644 --- a/fhem/FHEM/70_Pushover.pm +++ b/fhem/FHEM/70_Pushover.pm @@ -58,6 +58,7 @@ use SetExtensions; use Encode; no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; my %sets = ( "msg" => 1 ); diff --git a/fhem/FHEM/75_MSG.pm b/fhem/FHEM/75_MSG.pm index ffd3a0b8b..2501ea0ff 100755 --- a/fhem/FHEM/75_MSG.pm +++ b/fhem/FHEM/75_MSG.pm @@ -40,6 +40,7 @@ use Data::Dumper; use msgSchema; no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; sub CommandMsg($$;$$); diff --git a/fhem/FHEM/98_GEOFANCY.pm b/fhem/FHEM/98_GEOFANCY.pm index 50944824a..4f6cc66de 100755 --- a/fhem/FHEM/98_GEOFANCY.pm +++ b/fhem/FHEM/98_GEOFANCY.pm @@ -36,6 +36,7 @@ use Time::Local; use Data::Dumper; no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; sub GEOFANCY_Set($@); sub GEOFANCY_Define($$); diff --git a/fhem/FHEM/RESIDENTStk.pm b/fhem/FHEM/RESIDENTStk.pm index 69b4dfe23..b73556e9d 100644 --- a/fhem/FHEM/RESIDENTStk.pm +++ b/fhem/FHEM/RESIDENTStk.pm @@ -25,6 +25,7 @@ ############################################################################## no if $] >= 5.017011, warnings => 'experimental::smartmatch'; +no if $] >= 5.017011, warnings => 'experimental::lexical_topic'; ##################################### # PRE-DEFINITION: wakeuptimer