[libdatetime-timezone-perl] 05/09: Add a test to make sure we have zones and links

[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 f592e84d9298b79c7444aef72f2da396e99dfa5d
Author: Dave Rolsky <autarch at urth.org>
Date:   Wed Dec 24 13:56:15 2014 -0600

    Add a test to make sure we have zones and links
    
    This should prevent me from doing a release without zones (I hope)
---
 t/02basic.t | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/t/02basic.t b/t/02basic.t
index da272f9..5def0aa 100644
--- a/t/02basic.t
+++ b/t/02basic.t
@@ -14,9 +14,18 @@ BEGIN { require 'check_datetime_version.pl' }
 use DateTime::TimeZone;
 
 my @names = DateTime::TimeZone::all_names();
+cmp_ok(
+    scalar @names, '>', 100,
+    'at least 100 zones'
+);
+
 my %links = DateTime::TimeZone->links();
+cmp_ok(
+    scalar keys %links, '>', 100,
+    'at least 100 links'
+);
 
-my $is_maintainer = -d '.hg' || $ENV{RELEASE_TESTING} ? 1 : 0;
+my $is_maintainer = -d '.git' || $ENV{RELEASE_TESTING} ? 1 : 0;
 
 foreach my $name (@names) {
     my $resolved_name = $links{$name} || $name;

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