* eword-decode.el (eword-analyze-atom): Set enable-multibyte-characters

as nil when calling `string-match'.

diff --git a/ChangeLog b/ChangeLog
index d78b975..4608544 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1998-04-03  Tanaka Akira  <akr@jaist.ac.jp>
+
+       * eword-decode.el (eword-analyze-atom): Set enable-multibyte-characters
+       as nil when calling `string-match'.
+
 1998-03-23  Tanaka Akira  <akr@jaist.ac.jp>
 
        * 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 (file)
--- 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