[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Bug#690184: unblock: libdatetime-timezone-perl/1:1.49-1+2012f



Package: release.debian.org
Severity: normal
User: release.debian.org@packages.debian.org
Usertags: unblock

Please unblock package libdatetime-timezone-perl

unblock libdatetime-timezone-perl/1:1.49-1+2012f

It includes timezone information which is sadly not taken from the
tzdata binary package. (This is also a problem for the package currently
in squeeze.)

I've attached the debdiff minus the actual changes to the *.pm modules
which describe the timezones as these are quite long and mostly boring.

Ansgar
diff -Nru libdatetime-timezone-perl-1.46/Changes libdatetime-timezone-perl-1.49/Changes
--- libdatetime-timezone-perl-1.46/Changes	2012-04-02 16:39:17.000000000 +0200
+++ libdatetime-timezone-perl-1.49/Changes	2012-09-13 16:09:12.000000000 +0200
@@ -1,3 +1,21 @@
+1.49    2012-09-13
+
+- This release is based on version 2012f of the Olson database. This release
+  includes contemporary changes for Fiji.
+
+
+1.48    2012-08-03
+
+- This release is based on version 2012e of the Olson database. This release
+  includes contemporary changes for Fakaofo.
+
+
+1.47    2012-07-19
+
+- This release is based on version 2012d of the Olson database. This release
+  includes contemporary changes for Morocco.
+
+
 1.46    2012-04-02
 
 - This release is based on version 2012c of the Olson database. This release
diff -Nru libdatetime-timezone-perl-1.46/debian/changelog libdatetime-timezone-perl-1.49/debian/changelog
--- libdatetime-timezone-perl-1.46/debian/changelog	2012-04-05 19:06:25.000000000 +0200
+++ libdatetime-timezone-perl-1.49/debian/changelog	2012-09-14 13:12:13.000000000 +0200
@@ -1,3 +1,22 @@
+libdatetime-timezone-perl (1:1.49-1+2012f) unstable; urgency=low
+
+  * New upstream release, based on version 2012f of the Olson database.
+
+ -- gregor herrmann <gregoa@debian.org>  Fri, 14 Sep 2012 13:12:04 +0200
+
+libdatetime-timezone-perl (1:1.48-1+2012e) unstable; urgency=low
+
+  * New upstream release, based on version 2012e of the Olson database.
+
+ -- gregor herrmann <gregoa@debian.org>  Sat, 18 Aug 2012 14:13:30 +0200
+
+libdatetime-timezone-perl (1:1.47-1+2012d) unstable; urgency=low
+
+  * debian/control: update {versioned,alternative} (build) dependencies.
+  * New upstream release, based on version 2012d of the Olson database.
+
+ -- gregor herrmann <gregoa@debian.org>  Mon, 30 Jul 2012 22:59:13 +0200
+
 libdatetime-timezone-perl (1:1.46-1+2012c) unstable; urgency=low
 
   * New upstream release, based on version 2012c of the Olson database.
diff -Nru libdatetime-timezone-perl-1.46/debian/control libdatetime-timezone-perl-1.49/debian/control
--- libdatetime-timezone-perl-1.46/debian/control	2012-04-05 19:06:25.000000000 +0200
+++ libdatetime-timezone-perl-1.49/debian/control	2012-09-14 13:12:13.000000000 +0200
@@ -1,32 +1,33 @@
 Source: libdatetime-timezone-perl
+Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
+Uploaders: Krzysztof Krzyżaniak (eloy) <eloy@debian.org>,
+           gregor herrmann <gregoa@debian.org>,
+           Jonathan Yu <jawnsy@cpan.org>,
+           Ansgar Burchardt <ansgar@debian.org>,
+           Nicholas Bamber <nicholas@periapt.co.uk>
 Section: perl
 Priority: optional
 Build-Depends: debhelper (>= 8)
 Build-Depends-Indep: perl,
- libclass-load-perl,
- libclass-singleton-perl,
- libdatetime-perl,
- libparams-validate-perl,
- libtest-output-perl,
- perl (>= 5.10.1) | libparent-perl,
- perl (>= 5.10.1) | libtest-simple-perl (>= 0.88)
-Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
-Uploaders: Krzysztof Krzyżaniak (eloy) <eloy@debian.org>,
- gregor herrmann <gregoa@debian.org>, Jonathan Yu <jawnsy@cpan.org>,
- Ansgar Burchardt <ansgar@debian.org>, Nicholas Bamber <nicholas@periapt.co.uk>
+                     libclass-load-perl,
+                     libclass-singleton-perl,
+                     libdatetime-perl,
+                     libparams-validate-perl,
+                     libtest-output-perl
 Standards-Version: 3.9.3
-Homepage: http://datetime.perl.org/
-Vcs-Git: git://git.debian.org/pkg-perl/packages/libdatetime-timezone-perl.git
 Vcs-Browser: http://anonscm.debian.org/gitweb/?p=pkg-perl/packages/libdatetime-timezone-perl.git
+Vcs-Git: git://git.debian.org/pkg-perl/packages/libdatetime-timezone-perl.git
+Homepage: http://datetime.perl.org/
 
 Package: libdatetime-timezone-perl
 Architecture: all
+Depends: ${misc:Depends},
+         ${perl:Depends},
+         libclass-load-perl,
+         libclass-singleton-perl,
+         libparams-validate-perl,
+         perl
 Pre-Depends: dpkg (>= 1.15.6~)
-Depends: ${misc:Depends}, ${perl:Depends},
- libclass-load-perl,
- libclass-singleton-perl,
- libparams-validate-perl,
- perl (>= 5.10.1) | libparent-perl
 Description: framework exposing the Olson time zone database to Perl
  DateTime::TimeZone is a Perl module framework providing an interface to the
  Olson time zone database. It exposes the database as a set of modules, one
@@ -35,3 +36,4 @@
  .
  The Olson time zone database is the best available source for worldwide time
  zone information and is available from <URL:ftp://ftp.iana.org/tz/releases/>.
+
diff -Nru libdatetime-timezone-perl-1.46/tools/update-from-latest-olson libdatetime-timezone-perl-1.49/tools/update-from-latest-olson
--- libdatetime-timezone-perl-1.46/tools/update-from-latest-olson	2012-04-02 16:39:17.000000000 +0200
+++ libdatetime-timezone-perl-1.49/tools/update-from-latest-olson	2012-09-13 16:09:12.000000000 +0200
@@ -25,29 +25,52 @@
     local $CWD = $dir;
 
     if ( $opts{download} ) {
-        my $host = 'munnari.oz.au';
+        my $host = 'ftp.iana.org';
 
         my $ftp = Net::FTP->new( $host, Passive => 1 )
             or die "Cannot connect to $host: $@";
         $ftp->login()
             or die 'Cannot login: ', $ftp->message;
-        $ftp->cwd('/pub')
-            or die 'Cannot cwd to /pub: ', $ftp->message;
-        $ftp->binary();
-
-        for my $f ( $ftp->ls ) {
-            if ( $f =~ /^tz(?:code|data)/ ) {
-                print "Getting $f\n";
-                $ftp->get($f);
 
-                system( 'tar', 'xzf', $f );
+        my $dir = '/tz/releases';
+        $ftp->cwd($dir)
+            or die "Cannot cwd to $dir: ", $ftp->message;
+
+        my @code;
+        my @data;
+        for my $file ( $ftp->ls() ) {
+            next unless $file =~ /tz(code|data)(\d+)(\w+)\.tar\.gz/;
 
-                ($olson_version) = $f =~ /(\d\d\d\d\w)/;
+            if ( $1 eq 'code' ) {
+                push @code, [ $file, $2, $3 ];
+            }
+            else {
+                push @data, [ $file, $2, $3 ];
             }
         }
 
-        die "Did not retrieve anything from elsie"
-            unless $olson_version;
+        my $data
+            = ( sort { $b->[1] <=> $a->[1] or $b->[2] cmp $a->[2] } @data )[0]
+            ->[0];
+
+        my $code
+            = ( sort { $b->[1] <=> $a->[1] or $b->[2] cmp $a->[2] } @code )[0]
+            ->[0];
+
+        $ftp->binary();
+
+        for my $file ( $code, $data ) {
+            print "Getting $file\n";
+            $ftp->get($file)
+                or die "Cannot fetch $file: ", $ftp->message;
+
+            system( 'tar', 'xzf', $file );
+
+            ($olson_version) = $file =~ /(\d\d\d\d\w)/;
+
+            die "Did not retrieve anything from elsie"
+                unless $olson_version;
+        }
     }
     else {
         $dir =~ s{/$}{};

Reply to: