From 3a28ad32a52811883f532e2c5e00841a61265fd9 Mon Sep 17 00:00:00 2001 From: ichikawa Date: Thu, 4 Jun 1998 23:34:10 +0000 Subject: [PATCH] pop3-fma.el: Bug fix. --- lisp/pop3-fma.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/pop3-fma.el b/lisp/pop3-fma.el index 5569687..280062d 100644 --- a/lisp/pop3-fma.el +++ b/lisp/pop3-fma.el @@ -251,7 +251,8 @@ Argument PROMPT ." ;; ;; (defun pop3-fma-message-add-header () - (pop3-fma-add-custom-header "X-Ya-Pop3:" pop3-fma-version)) + (if (message-mail-p) + (pop3-fma-add-custom-header "X-Ya-Pop3:" pop3-fma-version))) ;; ;; Add your custom header. -- 1.7.10.4