[libdatetime-timezone-perl] 08/13: Small critic fixes

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to annotated tag v1.84
in repository libdatetime-timezone-perl.

commit dc8531b74c2b228c893dffdfba70f788747fd1dc
Author: Dave Rolsky <autarch at urth.org>
Date:   Sat Jan 17 10:58:22 2015 -0600

    Small critic fixes
---
 lib/DateTime/TimeZone.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/DateTime/TimeZone.pm b/lib/DateTime/TimeZone.pm
index d2acfbd..ad02e58 100644
--- a/lib/DateTime/TimeZone.pm
+++ b/lib/DateTime/TimeZone.pm
@@ -9,6 +9,7 @@ use DateTime::TimeZone::Catalog;
 use DateTime::TimeZone::Floating;
 use DateTime::TimeZone::Local;
 use DateTime::TimeZone::OffsetOnly;
+use DateTime::TimeZone::OlsonDB::Change;
 use DateTime::TimeZone::UTC;
 use Module::Runtime qw( require_module );
 use Params::Validate 0.72 qw( validate validate_pos SCALAR ARRAYREF BOOLEAN );
@@ -43,7 +44,7 @@ sub new {
         $p{name} = $DateTime::TimeZone::Catalog::LINKS{ uc $p{name} };
     }
 
-    unless ( $p{name} =~ m,/,
+    unless ( $p{name} =~ m{/}
         || $SpecialName{ $p{name} } ) {
         if ( $p{name} eq 'floating' ) {
             return DateTime::TimeZone::Floating->instance;
@@ -198,7 +199,7 @@ sub _span_for_datetime {
     unless ( defined $span ) {
         my $err = 'Invalid local time for date';
         $err .= ' ' . $dt->iso8601 if $type eq 'utc';
-        $err .= " in time zone: " . $self->name;
+        $err .= ' in time zone: ' . $self->name;
         $err .= "\n";
 
         die $err;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdatetime-timezone-perl.git