--- trunk/t/3-normalize.t	2007/11/01 00:16:48	949
+++ trunk/t/3-normalize.t	2007/11/03 13:33:19	980
@@ -3,7 +3,7 @@
 use strict;
 use blib;
 
-use Test::More tests => 347;
+use Test::More tests => 351;
 
 BEGIN {
 	use_ok( 'WebPAC::Test' );
@@ -849,5 +849,19 @@
 			["000", "0    5    A"]
 		]
 	);
+
+	test_s(qq{ isbn_13( '1558607013', '978-1558607019' ) });
+	test_s(qq{ isbn_10( '1558607013', '978-1558607019' ) });
+
+	is_deeply(
+		[ isbn_13( '1558607013', '978-1558607019' ) ],
+		[ '978-1-55860-701-9', '978-1-55860-701-9', ],
+	'isbn_13' );
+
+	is_deeply(
+		[ isbn_10( '1558607013', '978-1558607019' ) ],
+		[ '1-55860-701-3', '1-55860-701-3' ],
+	'isbn_10' );
+
 }