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 debian-bugs-dist-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Reply via email to