From d8b4b873f6dd0648e8a9aa9ea5988518f9b5f206 Mon Sep 17 00:00:00 2001 From: akr Date: Fri, 3 Apr 1998 15:38:48 +0000 Subject: [PATCH] * eword-decode.el (eword-analyze-atom): Set enable-multibyte-characters as nil when calling `string-match'. --- ChangeLog | 5 +++++ eword-decode.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index d78b975..4608544 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +1998-04-03 Tanaka Akira + + * eword-decode.el (eword-analyze-atom): Set enable-multibyte-characters + as nil when calling `string-match'. + 1998-03-23 Tanaka Akira * eword-decode.el (eword-decode-header): Set default-mime-charset when diff --git a/eword-decode.el b/eword-decode.el index 9a0b946..9a953c0 100644 --- a/eword-decode.el +++ b/eword-decode.el @@ -653,7 +653,8 @@ be the result." (cons (cons 'atom (car decoded)) (cdr decoded))))) (defun eword-analyze-atom (string &optional must-unfold) - (if (string-match std11-atom-regexp string) + (if (let ((enable-multibyte-characters nil)) + (string-match std11-atom-regexp string)) (let ((end (match-end 0))) (if (and eword-decode-sticked-encoded-word (string-match eword-encoded-word-in-phrase-regexp -- 1.7.10.4