summaryrefslogtreecommitdiff
path: root/dev-perl/DateTime-Tiny/files/1.04-locale-c.patch
blob: 9276f7d9f5015f33f551d7c8a13daca9f8d1185b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
From b03f13d762d577a3f4774c0ed64b8d376c74da9a Mon Sep 17 00:00:00 2001
From: Nigel Gregoire <nigelg@airg.com>
Date: Mon, 11 Jan 2016 12:00:06 -0800
Subject: [PATCH] Fix locale test for newer DateTime::Locale

As of v1.00, DateTime::Locale uses "en-US-POSIX" instead of "C".
---
 t/02_main.t | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/t/02_main.t b/t/02_main.t
index 18bd8d1..6c2b371 100644
--- a/t/02_main.t
+++ b/t/02_main.t
@@ -10,6 +10,7 @@ BEGIN {
 
 use Test::More tests => 31;
 use DateTime::Tiny;
+use version 0.77;
 
 
 
@@ -76,7 +77,10 @@ SKIP: {
 	# Expand to a DateTime
 	my $dt = $date->DateTime;
 	isa_ok( $dt, 'DateTime' );
-	is( $dt->locale->id,      'C',        '->locate ok'   );
+	# DateTime::Locale version 1.00 changes "C" to "en-US-POSIX".
+	my $expected = version->parse($DateTime::Locale::VERSION) < version->parse("1.00")
+		? "C" : "en-US-POSIX";
+	is( $dt->locale->id,      $expected,  '->locale ok'   );
 	is( $dt->time_zone->name, 'floating', '->timezone ok' );
 
 	# Compare accessor results