Add getVersion
Change-Id: Iddace1378a02dac8ee5ce4ab717689a319758387
diff --git a/t/server-test.t b/t/server-test.t
index 128707e..3146511 100644
--- a/t/server-test.t
+++ b/t/server-test.t
@@ -1,6 +1,6 @@
use strict;
use warnings;
-use Test::More tests=>5;
+use Test::More tests=>6;
use Mojo::JSON qw(decode_json encode_json to_json);
use REST::Client;
use Data::Dump qw(dump);
@@ -35,6 +35,10 @@
$res = decode_json($client->responseContent());
is($res->{f1}, 29, "collocation association");
+$client->GET('http://localhost:3000/getVersion');
+$res = $client->responseContent();
+like($res, qr/\d+\.?\d*\.?\d*/, "version ok");
+
for (my $i=0; $i<4; $i++) {
$pid++;
print STDERR "killing PID $pid\n";