[119310] trunk/dports/perl/p5-http-date/files/patch-lib-HTTP-Date.pm.diff

[mojca at macports.org]

Revision: 119310
          https://trac.macports.org/changeset/119310
Author:   mojca at macports.org
Date:     2014-04-22 13:41:10 -0700 (Tue, 22 Apr 2014)
Log Message:
-----------
p5-http-date: fix offset in patchfile

Modified Paths:
--------------
    trunk/dports/perl/p5-http-date/files/patch-lib-HTTP-Date.pm.diff

Modified: trunk/dports/perl/p5-http-date/files/patch-lib-HTTP-Date.pm.diff
===================================================================
--- trunk/dports/perl/p5-http-date/files/patch-lib-HTTP-Date.pm.diff	2014-04-22 20:38:21 UTC (rev 119309)
+++ trunk/dports/perl/p5-http-date/files/patch-lib-HTTP-Date.pm.diff	2014-04-22 20:41:10 UTC (rev 119310)
@@ -1,6 +1,6 @@
 --- lib/HTTP/Date.pm.orig	2008-04-11 11:59:19.000000000 -0700
 +++ lib/HTTP/Date.pm	2009-06-01 10:37:20.000000000 -0700
-@@ -40,7 +40,8 @@
+@@ -39,7 +39,8 @@
      if ($str =~ /^[SMTWF][a-z][a-z], (\d\d) ([JFMAJSOND][a-z][a-z]) (\d\d\d\d) (\d\d):(\d\d):(\d\d) GMT$/) {
  	return eval {
  	    my $t = Time::Local::timegm($6, $5, $4, $1, $MoY{$2}-1, $3);
@@ -10,7 +10,7 @@
  	};
      }
  
-@@ -53,7 +54,8 @@
+@@ -52,7 +53,8 @@
  	unless (defined($tz = shift)) {
  	    return eval { my $frac = $d[-1]; $frac -= ($d[-1] = int($frac));
  			  my $t = Time::Local::timelocal(reverse @d) + $frac;
@@ -20,7 +20,7 @@
  		        };
  	}
      }
-@@ -75,7 +77,8 @@
+@@ -74,7 +76,8 @@
  
      return eval { my $frac = $d[-1]; $frac -= ($d[-1] = int($frac));
  		  my $t = Time::Local::timegm(reverse @d) + $frac;
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20140422/b5e282c0/attachment.html>