1
0
forked from pool/perl-TimeDate

Accepting request 765206 from devel:languages:perl

OBS-URL: https://build.opensuse.org/request/show/765206
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-TimeDate?expand=0&rev=31
This commit is contained in:
Dominique Leuenberger 2020-01-23 15:08:05 +00:00 committed by Git OBS Bridge
commit 27c717df36
6 changed files with 29 additions and 68 deletions

View File

@ -1,3 +0,0 @@
version https://git-lfs.github.com/spec/v1
oid sha256:75bd254871cb5853a6aa0403ac0be270cdd75c9d1b6639f18ecba63c15298e86
size 31109

3
TimeDate-2.31.tar.gz Normal file
View File

@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:5c720fedb245122d073ea9c030aca24b06a615c71d40c46f832a8a1809354d81
size 29632

View File

@ -14,6 +14,3 @@ description: |-
($ss,$mm,$hh,$day,$month,$year,$zone). Elements are only defined if they
could be extracted from the date string. The $zone element is the timezone
offset in seconds from GMT. An empty array is returned upon failure.
patches:
perl-TimeDate-getdate.patch: -p1

View File

@ -1,55 +0,0 @@
From: Bernhard M. Wiedemann <bwiedemann suse de>
Subject: Fix bsc#1159990
Date: 2020-01-11
Index: TimeDate-2.30/t/getdate.t
===================================================================
--- TimeDate-2.30.orig/t/getdate.t
+++ TimeDate-2.30/t/getdate.t
@@ -156,7 +156,7 @@ Jul 22 10:00:00 UTC 2002 ;102733200
!;
require Time::Local;
-my $offset = Time::Local::timegm(0,0,0,1,0,70);
+my $offset = Time::Local::timegm(0,0,0,1,0,1970);
@data = split(/\n/, $data);
Index: TimeDate-2.30/t/cpanrt.t
===================================================================
--- TimeDate-2.30.orig/t/cpanrt.t
+++ TimeDate-2.30/t/cpanrt.t
@@ -1,7 +1,7 @@
use Date::Format qw(time2str strftime);
use Date::Parse qw(strptime str2time);
-print "1..8\n";
+print "1..10\n";
my $i = 1;
@@ -53,3 +53,11 @@ my $i = 1;
print "not " if str2time('16 Oct 09') < 0;
print "ok ", $i++, "\n";
}
+
+{ # https://rt.cpan.org/Public/Bug/Display.html?id=124509 year 2020 problem
+ print "# 1970-01-01 => 0\n";
+ print "not " if str2time('1970-01-01') != 0;
+ print "ok ", $i++, "\n";
+ print "not " if str2time('01 Jan 70') == 0;
+ print "ok ", $i++, "\n";
+}
Index: TimeDate-2.30/lib/Date/Parse.pm
===================================================================
--- TimeDate-2.30.orig/lib/Date/Parse.pm
+++ TimeDate-2.30/lib/Date/Parse.pm
@@ -195,7 +195,7 @@ sub {
}
}
- $year -= 1900 if defined $year && $year > 1900;
+ $year -= 1900 if defined $year && $year > 2000;
$zone += 3600 if defined $zone && $dst;
$ss += "0.$frac" if $frac;

View File

@ -1,3 +1,24 @@
-------------------------------------------------------------------
Fri Jan 17 10:33:12 UTC 2020 - Tina Müller <tina.mueller@suse.com>
- Remove patch perl-TimeDate-getdate.patch (source was fixed)
-------------------------------------------------------------------
Fri Jan 17 03:11:39 UTC 2020 - <timueller+perl@suse.de>
- updated to 2.31
see /usr/share/doc/packages/perl-TimeDate/ChangeLog
2.31 -- Thu Jan 16 14:00:00 MT 2020
* Fix year 2020 bug from t/getdate.t [Prajith]
* Fix warnings from t/date.t
* Fix pod issue in lib/Date/Parse.pm
* Fix for French language using English day suffixes in %o [mitchjacksontech]
* RT#84075: Fix Date::Parse::str2time century issue. [perlpilot]
* Adds Occitan language. [Quenty31]
* Migrate GitHub repo and bugtracker to atoomic/perl-TimeDate
-------------------------------------------------------------------
Sat Jan 11 04:10:44 UTC 2020 - Bernhard Wiedemann <bwiedemann@suse.com>

View File

@ -1,7 +1,7 @@
#
# spec file for package perl-TimeDate
#
# Copyright (c) 2020 SUSE LLC
# Copyright (c) 2020 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@ -17,16 +17,15 @@
Name: perl-TimeDate
Version: 2.30
Version: 2.31
Release: 0
%define cpan_name TimeDate
Summary: TimeDate Perl module
License: Artistic-1.0 OR GPL-1.0-or-later
Group: Development/Libraries/Perl
URL: https://metacpan.org/release/%{cpan_name}
Source0: https://cpan.metacpan.org/authors/id/G/GB/GBARR/%{cpan_name}-%{version}.tar.gz
Url: https://metacpan.org/release/%{cpan_name}
Source0: https://cpan.metacpan.org/authors/id/A/AT/ATOOMIC/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
Patch0: perl-TimeDate-getdate.patch
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
@ -51,8 +50,7 @@ strptime(DATE [, ZONE])
%prep
%setup -q -n %{cpan_name}-%{version}
find . -type f ! -name \*.pl -print0 | xargs -0 chmod 644
%patch0 -p1
find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -name "configure" -print0 | xargs -0 chmod 644
%build
perl Makefile.PL INSTALLDIRS=vendor