[Rt-commit] r8983 - in rt/branches/3.7-EXPERIMENTAL: . lib/RT

[sartak at bestpractical.com]

Author: sartak
Date: Mon Sep 10 16:33:37 2007
New Revision: 8983

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/html/Elements/SelectKey
   rt/branches/3.7-EXPERIMENTAL/lib/RT/User_Overlay.pm

Log:
 r42493 at onn:  sartak | 2007-09-10 16:33:29 -0400
 Use ruz's new GetKeysForEncryption method


Modified: rt/branches/3.7-EXPERIMENTAL/html/Elements/SelectKey
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/html/Elements/SelectKey	(original)
+++ rt/branches/3.7-EXPERIMENTAL/html/Elements/SelectKey	Mon Sep 10 16:33:37 2007
@@ -59,7 +59,7 @@
 require RT::Crypt::GnuPG;
 my $d;
 
-my %res = RT::Crypt::GnuPG::GetKeysInfo($EmailAddress);
+my %res = RT::Crypt::GnuPG::GetKeysForEncryption($EmailAddress);
 # move the preferred key to the top of the list
 my @keys = map {
                $_->{'Fingerprint'} eq $Default

Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/User_Overlay.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/User_Overlay.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/User_Overlay.pm	Mon Sep 10 16:33:37 2007
@@ -1630,7 +1630,7 @@
 
     # we don't have a preferred key for this user, so now we must query GPG
     require RT::Crypt::GnuPG;
-    my %res = RT::Crypt::GnuPG::GetKeysInfo($self->EmailAddress);
+    my %res = RT::Crypt::GnuPG::GetKeysForEncryption($self->EmailAddress);
     return undef unless defined $res{'info'};
     my @keys = @{ $res{'info'} };
     return undef if @keys == 0;