[Rt-commit] r8631 - rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Crypt

[ruz at bestpractical.com]

Author: ruz
Date: Sat Aug 18 02:18:20 2007
New Revision: 8631

Modified:
   rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Crypt/GnuPG.pm

Log:
* on decrypting we need decoded bodies

Modified: rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Crypt/GnuPG.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Crypt/GnuPG.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Crypt/GnuPG.pm	Sat Aug 18 02:18:20 2007
@@ -1027,6 +1027,11 @@
         meta_interactive => 0,
     );
 
+    if ( $args{'Data'}->bodyhandle->is_encoded ) {
+        require RT::EmailParser;
+        RT::EmailParser->_DecodeBody($args{'Data'});
+    }
+
     # handling passphrase in GnupGOptions
     $args{'Passphrase'} ||= delete $opt{'passphrase'};
 
@@ -1097,6 +1102,12 @@
         meta_interactive => 0,
     );
 
+    if ( $args{'Data'}->bodyhandle->is_encoded ) {
+        $RT::Logger->crit('data is encoded');
+        require RT::EmailParser;
+        RT::EmailParser->_DecodeBody($args{'Data'});
+    }
+
     # handling passphrase in GnupGOptions
     $args{'Passphrase'} ||= delete $opt{'passphrase'};