From 1147826c9093f70b143613d61afbcbb95c77db37 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 4 Jul 2013 18:00:37 +0200 Subject: fix smartmatch warnings on perl >= 5.018 --- lib/Travel/Routing/DE/VRR.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lib/Travel/Routing/DE/VRR.pm') diff --git a/lib/Travel/Routing/DE/VRR.pm b/lib/Travel/Routing/DE/VRR.pm index a88c9d6..29a30b3 100644 --- a/lib/Travel/Routing/DE/VRR.pm +++ b/lib/Travel/Routing/DE/VRR.pm @@ -4,6 +4,8 @@ use strict; use warnings; use 5.010; +no if $] >= 5.018, warnings => "experimental::smartmatch"; + use Carp qw(cluck); use Encode qw(decode); use Travel::Routing::DE::VRR::Route; @@ -37,7 +39,7 @@ use Exception::Class ( }, ); -our $VERSION = '2.02'; +our $VERSION = '2.03'; sub set_time { my ( $self, %conf ) = @_; @@ -684,7 +686,7 @@ Travel::Routing::DE::VRR - unofficial interface to the efa.vrr.de German itinera =head1 VERSION -version 2.02 +version 2.03 =head1 DESCRIPTION -- cgit v1.2.3