(std11-parse-ascii-token): Allow non-ASCII characters in comments.

diff --git a/std11-parse.el b/std11-parse.el
index 10912b0..608b600 100644 (file)
--- a/std11-parse.el
+++ b/std11-parse.el
@@ -5,7 +5,7 @@
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Keywords: mail, news, RFC 822, STD 11
 ;; Version:
-;;     $Id: std11-parse.el,v 0.15 1996-11-28 19:38:27 morioka Exp $
+;;     $Id: std11-parse.el,v 0.16 1997-07-13 17:58:15 morioka Exp $
 
 ;; This file is part of MU (Message Utilities).
 
@@ -162,12 +162,12 @@
   (let (token itl parsed token-value)
     (while (and lal
                (setq token (car lal))
-               (if (and (setq token-value (cdr token))
-                        (find-non-ascii-charset-string token-value)
-                        )
-                   (setq token nil)
-                 (std11-ignored-token-p token)
-                 ))
+               (or (std11-ignored-token-p token)
+                   (if (and (setq token-value (cdr token))
+                            (find-non-ascii-charset-string token-value)
+                            )
+                       (setq token nil)
+                     )))
       (setq lal (cdr lal))
       (setq itl (cons token itl))
       )