(mime-combine-message/partial-pieces-automatically): Use

`mime-entity-fetch-field' instead of `mime-fetch-field'.

diff --git a/mime-partial.el b/mime-partial.el
index 733f7f3..618c5a6 100644 (file)
--- a/mime-partial.el
+++ b/mime-partial.el
@@ -55,7 +55,7 @@ automatically."
            (not (y-or-n-p "Merge partials?"))
            )
        (mime-store-message/partial-piece entity situation)
-      (setq subject-id (mime-read-field 'Subject entity))
+      (setq subject-id (mime-entity-read-field entity 'Subject))
       (if (string-match "[0-9\n]+" subject-id)
          (setq subject-id (substring subject-id 0 (match-beginning 0)))
        )