Hello community,
here is the log from the commit of package perl-OLE-Storage_Lite for
openSUSE:Factory checked in at 2019-06-30 10:16:11
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-OLE-Storage_Lite (Old)
and /work/SRC/openSUSE:Factory/.perl-OLE-Storage_Lite.new.4615 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-OLE-Storage_Lite"
Sun Jun 30 10:16:11 2019 rev:10 rq:711711 version:0.19
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-OLE-Storage_Lite/perl-OLE-Storage_Lite.changes
2011-11-18 15:47:41.000000000 +0100
+++
/work/SRC/openSUSE:Factory/.perl-OLE-Storage_Lite.new.4615/perl-OLE-Storage_Lite.changes
2019-06-30 10:16:12.539126884 +0200
@@ -1,0 +2,5 @@
+Mon Jun 24 04:10:45 UTC 2019 - Bernhard Wiedemann <[email protected]>
+
+- Add fix-time-local.patch to make tests pass after 2019
+
+-------------------------------------------------------------------
New:
----
fix-time-local.patch
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-OLE-Storage_Lite.spec ++++++
--- /var/tmp/diff_new_pack.grJIQG/_old 2019-06-30 10:16:13.095127748 +0200
+++ /var/tmp/diff_new_pack.grJIQG/_new 2019-06-30 10:16:13.099127754 +0200
@@ -26,6 +26,7 @@
Url: http://search.cpan.org/dist/OLE-Storage_Lite/
Group: Development/Libraries/Perl
Source:
http://www.cpan.org/authors/id/J/JM/JMCNAMARA/%{cpan_name}-%{version}.tar.gz
+Patch0: fix-time-local.patch
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
@@ -41,6 +42,7 @@
%prep
%setup -q -n %{cpan_name}-%{version}
+%patch0 -p1
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
++++++ fix-time-local.patch ++++++
Date: 2018-02-21
Author: Bernhard M. Wiedemann <bwiedemann suse de>
https://rt.cpan.org/Public/Bug/Display.html?id=124513
fix how code uses Time::Local to ensure no relative 2-digit dates are used
to make tests pass in 2020 and beyond
Index: OLE-Storage_Lite-0.19/lib/OLE/Storage_Lite.pm
===================================================================
--- OLE-Storage_Lite-0.19.orig/lib/OLE/Storage_Lite.pm
+++ OLE-Storage_Lite-0.19/lib/OLE/Storage_Lite.pm
@@ -1364,7 +1364,9 @@ sub LocalDate2OLE {
return "\x00" x 8 unless $localtime;
# Convert from localtime (actually gmtime) to seconds.
- my $time = timegm( @{$localtime} );
+ my @localtimecopy = @{$localtime};
+ $localtimecopy[5] += 1900 unless $localtimecopy[5] > 99;
+ my $time = timegm( @localtimecopy );
# Add the number of seconds between the 1601 and 1970 epochs.
$time += 11644473600;
