Skip to content
Browse files

notes

  • Loading branch information...
1 parent ac459d9 commit 86d159d1d33b57e73f88fe907e4b798314a90826 @DrHyde DrHyde committed Sep 10, 2010
Showing with 5 additions and 0 deletions.
  1. +5 −0 t/902_bugfix-rt61177.t
View
5 t/902_bugfix-rt61177.t
@@ -10,7 +10,12 @@ ok(Number::Phone->new("442087712924")->country_code() == 44, "known countries re
ok(Number::Phone->new("+442087712924")->country_code() == 44, "known countries with a + return objects");
foreach my $prefix ('', '+') {
+ # can't really use a German number here, in case Number::Phone::DE
+ # exists and is installed. Need a mocked country
+ # FIXME
my $object = Number::Phone->new($prefix."491774497319");
isa_ok($object, 'Number::Phone', "unknown countries return minimal objects".($prefix? " with a +" : ""));
ok($object->country_code() == 49, "->country_code works");
+
+ # FIXME test other stuff like format(). what else?
}

0 comments on commit 86d159d

Please sign in to comment.
Something went wrong with that request. Please try again.