(mime-magic-type-alist): New variable; abolish

[elisp/semi.git] / mime-edit.el

diff --git a/mime-edit.el b/mime-edit.el
index f911ce2..0d28389 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -513,8 +513,11 @@ If it is not specified for a major-mode,
 (defconst mime-edit-split-ignored-field-regexp
   "\\(^Content-\\|^Subject:\\|^Mime-Version:\\|Message-Id:\\)")
 
-(defvar mime-edit-split-blind-field-regexp
-  "\\(^[BDFbdf]cc:\\|^cc:[ \t]*$\\)")
+(defcustom mime-edit-split-blind-field-regexp
+  "\\(^[BDFbdf]cc:\\|^cc:[ \t]*$\\)"
+  "*Regular expression to match field-name to be ignored when split sending."
+  :group 'mime-edit
+  :type 'regexp)
 
 (defvar mime-edit-split-message-sender-alist nil)
 
@@ -2485,7 +2488,7 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
         (concat "^" (regexp-quote separator) "$"))
        (replace-match "")
       )
-    (mime-view-mode)
+    (mime-view-buffer)
     ))
 
 (defun mime-edit-quitting-method ()