Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

another test

  • Loading branch information...
commit 820b4ce28b51bef683dbdeff04d5fdb4c1375fc5 1 parent d7b2b1c
@moritz authored
Showing with 3 additions and 1 deletion.
  1. +3 −1 t/extraction.t
View
4 t/extraction.t
@@ -1,4 +1,4 @@
-use Test::More tests => 6;
+use Test::More tests => 7;
use lib qw/blib lib/;
use ISBN::Country qw/isbn_extract/;
use strict;
@@ -19,3 +19,5 @@ is $h->{lang}[0], 'en', 'isbn-13 without dashes';
$h = isbn_extract('978-0-345-51870-5');
is $h->{lang}[0], 'en', 'isbn-13 with dashes';
+
+is isbn_extract('9509080004')->{lang}[0], 'es', 'they speak Spanish in Argentina';
Please sign in to comment.
Something went wrong with that request. Please try again.