From: tomo <tomo>
Date: Wed, 20 Dec 2000 08:50:59 +0000 (+0000)
Subject: (emh-forward): Delete unused local variable `msubtype'.
X-Git-Tag: emh-1_14_0~5
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Femh.git;a=commitdiff_plain;h=17f585d5b3b2d7145fa3bd767e3bc6b2987a4176

(emh-forward): Delete unused local variable `msubtype'.
---

diff --git a/emh-comp.el b/emh-comp.el
index c50233c..dcbe6c6 100644
--- a/emh-comp.el
+++ b/emh-comp.el
@@ -350,12 +350,9 @@ then prompt for the message sequence. See also documentation for
 			 (set-buffer-modified-p nil)))
 		      (t
 		       (mh-read-draft "" draft-name nil)))))
-    (let ((msubtype "digest")
-	  orig-from orig-subject multipart-flag
-	  (tag-regexp
-	   (concat "^"
-		   (regexp-quote (mime-make-tag "message" "rfc822"))))
-	  )
+    (let ((tag-regexp
+	   (concat "^" (regexp-quote (mime-make-tag "message" "rfc822"))))
+	  orig-from orig-subject multipart-flag)
       (goto-char (point-min))
       (save-excursion
 	(save-restriction