diff options
| -rw-r--r-- | lisp/mail/rmail.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index e0e5237133b..341565bc52a 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -640,7 +640,8 @@ Note: it means the file has no messages in it.\n\^_"))) | |||
| 640 | (unless (and coding-system | 640 | (unless (and coding-system |
| 641 | (coding-system-p coding-system)) | 641 | (coding-system-p coding-system)) |
| 642 | (setq coding-system (detect-coding-region from to t))) | 642 | (setq coding-system (detect-coding-region from to t))) |
| 643 | (unless (eq coding-system 'undecided) | 643 | (unless (memq coding-system |
| 644 | '(undecided undecided-unix)) | ||
| 644 | (decode-coding-region from to coding-system) | 645 | (decode-coding-region from to coding-system) |
| 645 | (setq coding-system last-coding-system-used)) | 646 | (setq coding-system last-coding-system-used)) |
| 646 | (set-buffer-modified-p modifiedp) | 647 | (set-buffer-modified-p modifiedp) |