X-Git-Url: http://git.ieval.ro/?p=lyrics-fetcher-lyricstranslate.git;a=blobdiff_plain;f=t%2F01-network.t;h=55d5850e4ffed8b41d43f81ff793a1e0456c434d;hp=c924884040f3f611fe33972b5795299b33b6878f;hb=97de0b8d84c378653a6423016d4e22ecca933385;hpb=8185bfe821b15836bd175fb8e9241f94d57026e6

diff --git a/t/01-network.t b/t/01-network.t
index c924884..55d5850 100644
--- a/t/01-network.t
+++ b/t/01-network.t
@@ -2,14 +2,33 @@
 use strict;
 use warnings;
 
-use Test::More;
 use Test::RequiresInternet ('lyricstranslate.com' => 80);
+use Test::More tests => 5;
 
-plan tests => 1;
-
+use Lyrics::Fetcher;
 use Lyrics::Fetcher::LyricsTranslate;
 
 like (
 	Lyrics::Fetcher::LyricsTranslate->fetch('Lyube', 'Kombat'),
 	qr/soldiers/i,
 	'lyrics to Lyube - Kombat contain the word "soldiers"');
+
+like (
+	Lyrics::Fetcher->fetch('Lyube', 'Kombat', 'LyricsTranslate'),
+	qr/soldiers/i,
+	'usage via Lyrics::Fetcher');
+
+like (
+	Lyrics::Fetcher::LyricsTranslate->fetch('Lyube', 'Kombat', 'English'),
+	qr/soldiers/i,
+	'language selection: English');
+
+like (
+	Lyrics::Fetcher::LyricsTranslate->fetch('Lyube', 'Kombat', 'English'),
+	qr/soldiers/i,
+	'language selection: 328');
+
+like (
+	Lyrics::Fetcher::LyricsTranslate->fetch('Lyube', 'Kombat', 'Transliteration'),
+	qr/soldaty/i,
+	'language selection: Transliteration');