[Rt-commit] r9309 - in rt/branches/3.7-RTIR-RELENG: html/Ticket/Elements

[sartak at bestpractical.com]

Author: sartak
Date: Mon Oct 15 16:28:45 2007
New Revision: 9309

Modified:
   rt/branches/3.7-RTIR-RELENG/   (props changed)
   rt/branches/3.7-RTIR-RELENG/html/Ticket/Elements/ShowGnuPGStatus

Log:
 r43699 at onn:  sartak | 2007-10-15 16:28:21 -0400
 Don't show "message is unsigned" warnings for mail generated by RT


Modified: rt/branches/3.7-RTIR-RELENG/html/Ticket/Elements/ShowGnuPGStatus
==============================================================================
--- rt/branches/3.7-RTIR-RELENG/html/Ticket/Elements/ShowGnuPGStatus	(original)
+++ rt/branches/3.7-RTIR-RELENG/html/Ticket/Elements/ShowGnuPGStatus	Mon Oct 15 16:28:45 2007
@@ -67,7 +67,12 @@
         require RT::Crypt::GnuPG;
         push @runs, [ RT::Crypt::GnuPG::ParseStatus( $_ ) ];
     }
+
     $needs_unsigned_warning = 0 if /^X-RT-Incoming-Signature:/;
+
+    # if this is set, then the email is generated by RT, and so we don't
+    # need "email is unsigned" warnings
+    $needs_unsigned_warning = 0 if /^X-RT-Loop-Prevention:/;
 }
 
 return unless @runs or $needs_unsigned_warning;
@@ -116,6 +121,7 @@
         for ( @status ) {
             if ( $_->{'Operation'} eq 'Verify' && $_->{'Status'} eq 'DONE' ) {
                 $top->AddHeader( 'X-RT-Incoming-Signature' => $_->{'UserString'} );
+                $needs_unsigned_warning = 0;
             }
         }
     }