+2006-01-16 Mark D. Baushke <mdb@gnu.org>
+
+ * mh-mime.el (mh-mime-display, mh-mm-inline-message): Fix use of
+ mm- functions for proper text=flowed handling. (SF #1273521)
+ (Patch contributed by Katsumi Yamaoka <yamaoka@jpl.org>.)
+
2006-01-15 Bill Wohler <wohler@newt.com>
* mh-e.el (mh-limit-map, mh-help-messages): Change keybinding of
;; If needed dissect the current buffer
(if pre-dissected-handles
(setq handles pre-dissected-handles)
- (setq handles (or (mm-dissect-buffer nil) (mm-uu-dissect)))
+ (if (setq handles (mm-dissect-buffer nil))
+ (when (fboundp 'mm-uu-dissect-text-parts)
+ (mm-uu-dissect-text-parts handles))
+ (setq handles (mm-uu-dissect)))
(setf (mh-mime-handles (mh-buffer-data))
(mm-merge-handles handles
(mh-mime-handles (mh-buffer-data))))
(mh-mime-display
(or (gethash handle (mh-mime-handles-cache (mh-buffer-data)))
(setf (gethash handle (mh-mime-handles-cache (mh-buffer-data)))
- (let ((handles (or (mm-dissect-buffer nil)
- (mm-uu-dissect))))
+ (let ((handles (mm-dissect-buffer nil)))
+ (if handles
+ (when (fboundp 'mm-uu-dissect-text-parts)
+ (mm-uu-dissect-text-parts handles))
+ (setq handles (mm-uu-dissect)))
(setf (mh-mime-handles (mh-buffer-data))
(mm-merge-handles
handles (mh-mime-handles (mh-buffer-data))))