w2v-server: allow POST and GET for getClassicCollocators
diff --git a/w2v-server.pl b/w2v-server.pl
index 3e59a57..d580925 100755
--- a/w2v-server.pl
+++ b/w2v-server.pl
@@ -89,9 +89,9 @@
$self->render(json => $vec);
};
-post '/derekovecs/getClassicCollocators' => sub {
+any '/derekovecs/getClassicCollocators' => sub {
my $self = shift;
- $self->render(data => getClassicCollocators($self->req->json), format=>'json');
+ $self->render(data => getClassicCollocators($self->param("w") ? $self->param("w") : $self->req->json), format=>'json');
};
post '/getClassicCollocators' => sub {