[Rt-commit] r7607 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Sat Apr 21 22:24:47 2007
New Revision: 7607

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Email.pm

Log:
 r5062 at cubic-pc:  cubic | 2007-04-22 06:23:57 +0400
 * pass arguments without preselecting list of options


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Email.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Email.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Email.pm	Sat Apr 21 22:24:47 2007
@@ -569,11 +569,7 @@
     $RT::Logger->debug("$msgid Encrypting message") if $args{'Ecrypt'};
 
     require RT::Crypt::GnuPG;
-    my %res = RT::Crypt::GnuPG::SignEncrypt(
-        Entity => $args{'Entity'},
-        Sign => $args{'Sign'},
-        Encrypt => $args{'Encrypt'},
-    );
+    my %res = RT::Crypt::GnuPG::SignEncrypt( %args );
     return 1 unless $res{'exit_code'};
 
     my @status = RT::Crypt::GnuPG::ParseStatus( $res{'status'} );
@@ -632,11 +628,7 @@
     }
 
     # redo without broken recipients
-    %res = RT::Crypt::GnuPG::SignEncrypt(
-        Entity => $args{'Entity'},
-        Sign => $args{'Sign'},
-        Encrypt => $args{'Encrypt'},
-    );
+    %res = RT::Crypt::GnuPG::SignEncrypt( %args );
     return 0 if $res{'exit_code'};
 
     return 1;