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

diff --git a/emh-comp.el b/emh-comp.el
index c50233c..dcbe6c6 100644 (file)
--- 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