4242 |
(not message-forward-decoded-p)) |
(not message-forward-decoded-p)) |
4243 |
(insert |
(insert |
4244 |
(with-temp-buffer |
(with-temp-buffer |
4245 |
(mm-disable-multibyte-mule4) ;; Must copy buffer in unibyte mode |
(mm-disable-multibyte) ;; Must copy buffer in unibyte mode |
4246 |
(insert |
(insert |
4247 |
(with-current-buffer forward-buffer |
(with-current-buffer forward-buffer |
4248 |
(mm-string-as-unibyte (buffer-string)))) |
(mm-string-as-unibyte (buffer-string)))) |
4249 |
(mm-enable-multibyte-mule4) |
(mm-enable-multibyte) |
4250 |
(mime-to-mml) |
(mime-to-mml) |
4251 |
(goto-char (point-min)) |
(goto-char (point-min)) |
4252 |
(when (looking-at "From ") |
(when (looking-at "From ") |