From 163cac59b54dfba115baf92b20d67f051e3772a7 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 26 Jan 2022 01:30:58 +0000
Subject: a couple little things

---
 email.org | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'email.org')

diff --git a/email.org b/email.org
index 25e1a2a..ba0ba05 100644
--- a/email.org
+++ b/email.org
@@ -178,8 +178,7 @@
             (when (and (or (message-fetch-field "Gcc")
                            (message-fetch-field "Fcc"))
                        (not (y-or-n-p "Archive? ")))
-              (message-remove-header "Gcc")
-              (message-remove-header "Fcc")))))
+              (message-remove-header "\\(?:[BFG]cc\\)")))))
     #+end_src
 *** Check recipient
     #+begin_src emacs-lisp
-- 
cgit v1.2.3