modify test to test export of OpenPGP_to_OpenSSH_pub

diff --git a/unit-tests/40.keytrans/10.openpgp2ssh.t b/unit-tests/40.keytrans/10.openpgp2ssh.t
index a14b641dedb589783b7d463e3da38b8a846f2aae..ed042fa55e805e14834f7f5a2148783c9b0c5fc4 100644 (file)
--- a/unit-tests/40.keytrans/10.openpgp2ssh.t
+++ b/unit-tests/40.keytrans/10.openpgp2ssh.t
@@ -1,7 +1,7 @@
 # -*- perl -*-
 use Test::More;
 
-use Crypt::Monkeysphere::Keytrans;
+use Crypt::Monkeysphere::Keytrans qw(GnuPGKey_to_OpenSSH_pub);
 use GnuPG::Interface;
 use File::Temp qw(tempdir);
 
@@ -47,7 +47,7 @@ waitpid($pid, 0);
 my @keys = $gnupg->get_public_keys();
 
 foreach $key (@keys) {
-  my $output = Crypt::Monkeysphere::Keytrans::GnuPGKey_to_OpenSSH_pub($key);
+  my $output = GnuPGKey_to_OpenSSH_pub($key);
   is($sshdata, $output);
 }