[libdatetime-timezone-perl] 04/09: Fix handling of infinity in regex when generating zones

[gregor herrmann]

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

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

commit 1b4a5fb4c3ea72b83ab3864d6c52127fac04cfa4
Author: Dave Rolsky <autarch at urth.org>
Date:   Wed Dec 24 13:55:37 2014 -0600

    Fix handling of infinity in regex when generating zones
---
 tools/parse_olson | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/parse_olson b/tools/parse_olson
index 6916951..796818e 100755
--- a/tools/parse_olson
+++ b/tools/parse_olson
@@ -216,8 +216,8 @@ sub parse_file {
 
         my $spans = serialize_spans( zone_as_spans($zone) );
 
-        $spans =~ s/inf/DateTime::TimeZone::INFINITY/gi;
         $spans =~ s/-inf/DateTime::TimeZone::NEG_INFINITY/gi;
+        $spans =~ s/\binf/DateTime::TimeZone::INFINITY/gi;
 
         $spans =~ s/('(?:start|end)_date'\s+=>\s+)'(\d+)'/$1$2/g;
 

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