Added german poliqarp tutorial
Change-Id: I6addb6c6c4a0fee2f5725701b961ac58a531db1a
diff --git a/t/doc.t b/t/doc.t
index 1b06146..b16e1d9 100644
--- a/t/doc.t
+++ b/t/doc.t
@@ -7,6 +7,7 @@
my $t = Test::Mojo->new('Kalamar');
+# Embedding
$t->get_ok('/doc/ql/poliqarp-plus')
->status_is(200)
->text_like('title', qr/poliqarp/i)
@@ -27,5 +28,31 @@
->element_exists('li.folded.active')
->text_is('li.folded.active a', 'Poliqarp+');
+# Languages
+$t->get_ok('/' => { 'Accept-Language' => 'de-DE, en-US, en' })
+ ->status_is(200)
+ ->text_is("title", "KorAP - Korpusanalyseplattform der nächsten Generation");
+
+$t->get_ok('/' => { 'Accept-Language' => 'en-US, en, de-DE' })
+ ->status_is(200)
+ ->text_is("title", "KorAP - Corpus Analysis Platform");
+
+
+# Pages
+$t->get_ok('/doc/ql/poliqarp-plus' => { 'Accept-Language' => 'en-US, en, de-DE' })
+ ->status_is(200)
+ ->text_is("title", "KorAP: Poliqarp+")
+ ->text_is('main section > h3', 'Simple Segments');
+
+$t->get_ok('/doc/ql/poliqarp-plus' => { 'Accept-Language' => 'de-DE, en-US, en' })
+ ->status_is(200)
+ ->text_is("title", "KorAP: Poliqarp+")
+ ->text_is('main section > h3', 'Einfache Segmente');
+
+
+$t->get_ok('/doc/ql/annis' => { 'Accept-Language' => 'en-US, en, de-DE' })
+ ->status_is(200)
+ ->text_is("title", "KorAP: Annis QL");
+
done_testing();