add --help usage to msva-query-agent
authorJameson Rollins <jrollins@finestructure.net>
Wed, 22 Dec 2010 21:09:56 +0000 (16:09 -0500)
committerJameson Rollins <jrollins@finestructure.net>
Wed, 22 Dec 2010 21:09:56 +0000 (16:09 -0500)
msva-query-agent

index c8ebdd260fff88e4c7ae3d683fb523619f019db0..784c16f599113d516011ad8b31483e8e0de1e1b4 100755 (executable)
@@ -22,6 +22,10 @@ use strict;
 use Crypt::Monkeysphere::MSVA::Client;
 
 my $context = shift;
+if ($context eq '--help') {
+    printf("Usage: msva-query-agent CONTEXT PEER PKC_TYPE [PEER_TYPE] <PKC_DATA\n");
+    exit 0;
+}
 my $peer = shift;
 my $pkctype = shift;
 my $peertype = shift;