From a5816ef60e71034e258f931d45c8f05406d462f4 Mon Sep 17 00:00:00 2001
From: Etienne Perot <etienne@perot.me>
Date: Wed, 8 Aug 2012 17:21:44 -0400
Subject: [PATCH] Add X-Gpgit-Execute header to all messages encrypted with
 gpgit, so that it is easier to tell which messages have been sent encrypted
 and which messages were merely encrypted by gpgit

---
 gpgit | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gpgit b/gpgit
index 4adcdc6..55937b9 100755
--- a/gpgit
+++ b/gpgit
@@ -124,7 +124,7 @@ use MIME::Parser;
 
            ## Keep the new message if it was succesfully flattened
              if( $new_mime->mime_type !~ /^multipart\// ){
-                $new_mime->head->add('X-GPGIT-Flattened-From', $orig_mime_structure );
+                $new_mime->head->add('X-Gpgit-Flattened-From', $orig_mime_structure );
                 $mime = $new_mime;
              }
         }
@@ -134,6 +134,7 @@ use MIME::Parser;
 ## Encrypt
   {
      my $code;
+     $mime->head->add('X-Gpgit-Executed', 'True' );
      if( $encrypt_mode eq 'pgpmime' ){
         $code = $gpg->mime_encrypt( $mime, @recipients );
      } elsif( $encrypt_mode eq 'prefer-inline' ){