+(defun notmuch-show-mm-display-part-inline (part content-type)
+ "Use the mm-decode/mm-view functions to display a part inline, if possible."
+ (let ((handle (mm-make-handle nil (list content-type))))
+ (if (and (mm-inlinable-p handle)
+ (mm-inlined-p handle))
+ (progn
+ (insert (with-temp-buffer
+ (let ((display-buffer (current-buffer)))
+ (with-temp-buffer
+ (let ((work-buffer (current-buffer)))
+ (insert (plist-get part :content))
+ (set-buffer display-buffer)
+ (mm-display-part (mm-make-handle work-buffer
+ (list content-type)))
+ (buffer-string))))))
+ t)))
+ nil)
+
+(defun notmuch-show-insert-part-text/plain (part content-type nth depth)