diff options
Diffstat (limited to 'keyserver/gpgkeys_mailto.in')
-rwxr-xr-x | keyserver/gpgkeys_mailto.in | 25 |
1 files changed, 24 insertions, 1 deletions
diff --git a/keyserver/gpgkeys_mailto.in b/keyserver/gpgkeys_mailto.in index 0691e4c46..7167c3afd 100755 --- a/keyserver/gpgkeys_mailto.in +++ b/keyserver/gpgkeys_mailto.in @@ -1,6 +1,6 @@ #!@PERL@ -w -# gpgkeys_mailto - talk to a email keyserver +# gpgkeys_mailto - talk to a email keyserver # Copyright (C) 2001, 2002 Free Software Foundation, Inc. # # This file is part of GnuPG. @@ -20,10 +20,28 @@ # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA use Getopt::Std; +$Getopt::Std::STANDARD_HELP_VERSION=1; $sendmail="@SENDMAIL@ -t"; ### +sub VERSION_MESSAGE () +{ + print STDOUT "gpgkeys_mailto (GnuPG) 1.3.91-cvs\n"; +} + +sub HELP_MESSAGE () +{ + print STDOUT <<EOT + +--help Print this help +--version Print the version +-o FILE Write output to FILE +EOT +} + + + getopts('o:'); if(defined($opt_o)) @@ -200,3 +218,8 @@ if($command=~/send/i) } } } + + +# Local Variables: +# mode:perl +# End: |