msva-query-agent report usage when no arguments are given

diff --git a/msva-query-agent b/msva-query-agent
index 62e291ad38a266cd5b0e8c05b1a3033eadeb2162..ef8a2d4642d71f82dc95e381c847c9a4d5fcb7bc 100755 (executable)
--- a/msva-query-agent
+++ b/msva-query-agent
@@ -22,7 +22,8 @@ use strict;
 use Crypt::Monkeysphere::MSVA::Client;
 
 my $context = shift;
-if ($context eq '--help') {
+if ((!defined($context)) ||
+    $context eq '--help') {
   printf STDERR "Usage: msva-query-agent CONTEXT PEER PKC_TYPE [PEER_TYPE] <PKC_DATA\n";
   printf STDERR "       msva-query-agent CONTEXT PEER PKC_TYPE PEER_TYPE PKC_DATA\n";
   printf STDERR "       msva-query-agent --version\n";