From 84b3e1a7a35b2b34ff24e40a0b152c99c4a7b25e Mon Sep 17 00:00:00 2001 From: tomo Date: Fri, 11 Aug 2000 11:52:33 +0000 Subject: [PATCH] (mime-display-text/plain): Display warning message when `mime-insert-text-content' fails. --- mime-view.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/mime-view.el b/mime-view.el index 3f5cf9f..24678d0 100644 --- a/mime-view.el +++ b/mime-view.el @@ -722,7 +722,11 @@ Each elements are regexp of field-name.") (defun mime-display-text/plain (entity situation) (save-restriction (narrow-to-region (point-max)(point-max)) - (mime-insert-text-content entity) + (condition-case nil + (mime-insert-text-content entity) + (error (progn + (message "Can't decode current entity.") + (sit-for 1)))) (run-hooks 'mime-text-decode-hook) (goto-char (point-max)) (if (not (eq (char-after (1- (point))) ?\n)) -- 1.7.10.4