Support VCs via URL without queries (fixes #207)
Change-Id: Idb8a8353f1128bbbd21b235a2e013ac4ab780661
diff --git a/t/intro.t b/t/intro.t
index ef8bec5..6d46466 100644
--- a/t/intro.t
+++ b/t/intro.t
@@ -49,6 +49,20 @@
->element_exists('meta[name="DC.description"][content="KorAP - Corpus Analysis Platform"]')
->element_exists('meta[name="keywords"][content^="KorAP"]')
->element_exists('body[itemscope][itemtype="http://schema.org/WebApplication"]')
+ ->element_exists_not('#koralQuery')
+ ;
+
+$t->get_ok('/?cq=corpusSigle%3DGOE')
+ ->status_is(200)
+ ->text_is('title', 'KorAP - Corpus Analysis Platform')
+ ->text_is('h1 span', 'KorAP - Corpus Analysis Platform')
+ ->element_exists_not('#notifications div.notify')
+ ->element_exists('div.intro')
+ ->text_is('div.intro h2', 'This is a custom intro page!')
+ ->element_exists('meta[name="DC.description"][content="KorAP - Corpus Analysis Platform"]')
+ ->element_exists('meta[name="keywords"][content^="KorAP"]')
+ ->element_exists('body[itemscope][itemtype="http://schema.org/WebApplication"]')
+ ->element_exists('#koralQuery')
;
$t->get_ok('/huhuhuhuhu')
diff --git a/t/server/mock.pl b/t/server/mock.pl
index e64f14e..32485fb 100644
--- a/t/server/mock.pl
+++ b/t/server/mock.pl
@@ -168,6 +168,12 @@
);
};
+ if ($v->param('q') eq $Kalamar::Controller::Search::query_placeholder) {
+ # Get response based on query parameter
+ my $response = $c->load_response('query_baum_o0_c25_cq');
+ return $c->render(%$response);
+ };
+
my @slug_base = ($v->param('q'));
push @slug_base, 'o' . $v->param('offset') if defined $v->param('offset');
push @slug_base, 'c' . $v->param('count') if defined $v->param('count');