Package: monkeysphere
Version: 0.35-2
I suggest that something like this is useful:
--- /usr/share/monkeysphere/keytrans 2011-02-25 14:41:39.000000000 -0500
+++ /tmp/openpgp2pem 2013-01-17 14:19:16.731425742 -0500
@@ -1119,6 +1119,22 @@
die "No matching key found.\n";
}
}
+ elsif (/^openpgp2pem$/) {
+ my $fpr = shift;
+ my $instream;
+ open($instream,'-');
+ binmode($instream, ":bytes");
+ my $key = openpgp2rsa($instream, $fpr);
+ if (defined($key)) {
+ if ($key->is_private()) {
+ print $key->get_private_key_string();
+ } else {
+ print $key->get_public_key_string()."\n";
+ }
+ } else {
+ die "No matching key found.\n";
+ }
+ }
elsif (/^keytrans$/) {
# subcommands when keytrans is invoked directly are UNSUPPORTED,
# UNDOCUMENTED, and WILL NOT BE MAINTAINED.
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
