From: David Bremner <bremner@unb.ca>
Date: Sun, 24 Apr 2011 10:33:24 +0000 (-0300)
Subject: modify test to test export of OpenPGP_to_OpenSSH_pub
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=8080cc9db88173e21d185713bd6d332c5187448f;p=monkeysphere-validation-agent.git

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 a14b641..ed042fa 100644
--- 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);
 }