From d8ea9529540ecb52207d742eff082bfa6cef0711 Mon Sep 17 00:00:00 2001
From: hcs-svn <hcs-svn@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 7 Feb 2016 09:19:11 +0000
Subject: [PATCH] =?UTF-8?q?98=5FCustomReadings:=20fixed=20=E2=80=9ESmartma?=
 =?UTF-8?q?tch=20is=20experimental=E2=80=9C=20warning?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://svn.fhem.de/fhem/trunk@10750 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_CustomReadings.pm | 19 +++++++------------
 1 file changed, 7 insertions(+), 12 deletions(-)

diff --git a/fhem/FHEM/98_CustomReadings.pm b/fhem/FHEM/98_CustomReadings.pm
index bcdf4f789..97fc81509 100644
--- a/fhem/FHEM/98_CustomReadings.pm
+++ b/fhem/FHEM/98_CustomReadings.pm
@@ -9,9 +9,9 @@ use strict;
 use warnings;
 use SetExtensions;
 
-sub
-CustomReadings_Initialize($)
-{
+no if $] >= 5.017011, warnings => 'experimental::smartmatch';
+
+sub CustomReadings_Initialize($) {
   my ($hash) = @_;
 
   $hash->{DefFn}         = "CustomReadings_Define";
@@ -22,8 +22,7 @@ CustomReadings_Initialize($)
 }
 
 sub
-CustomReadings_Define($$)
-{
+CustomReadings_Define($$) {
   my ($hash, $def) = @_;
   my $name = $hash->{NAME};
 
@@ -32,8 +31,7 @@ CustomReadings_Define($$)
   return undef;
 }
 
-sub CustomReadings_read($)
-{
+sub CustomReadings_read($) {
   my ($hash) = @_;
   my $name = $hash->{NAME};
   
@@ -120,9 +118,7 @@ sub CustomReadings_read($)
 }
 
 
-sub
-CustomReadings_Undef($$)
-{
+sub CustomReadings_Undef($$) {
   my ($hash, $arg) = @_;
   my $name = $hash->{NAME};
   
@@ -131,8 +127,7 @@ CustomReadings_Undef($$)
   return undef;
 }
 
-sub CustomReadings_GetHTML ($)
-{
+sub CustomReadings_GetHTML ($) {
 	my ($name) = @_;
   my $hash = $main::defs{$name};
   my $result = "";