From: morioka Date: Thu, 25 Sep 1997 16:06:50 +0000 (+0000) Subject: (std11-special-char-list): Fix order for regexp. X-Git-Tag: XEmacs-20_3-b27-viet X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d511ad477361600658eee2b7f7bae633fcd55277;p=elisp%2Fapel.git (std11-special-char-list): Fix order for regexp. --- diff --git a/std11-parse.el b/std11-parse.el index 0c6ae32..631881d 100644 --- a/std11-parse.el +++ b/std11-parse.el @@ -4,7 +4,7 @@ ;; Author: MORIOKA Tomohiko ;; Keywords: mail, news, RFC 822, STD 11 -;; Version: $Id: std11-parse.el,v 0.17 1997-09-25 15:01:24 morioka Exp $ +;; Version: $Id: std11-parse.el,v 0.18 1997-09-25 16:06:50 morioka Exp $ ;; This file is part of MU (Message Utilities). @@ -34,9 +34,10 @@ (defconst std11-space-chars " \t\n") (defconst std11-spaces-regexp (` (, (concat "[" std11-space-chars "]+")))) -(defconst std11-special-char-list '(?\( ?\) ?< ?> ?@ +(defconst std11-special-char-list '(?\] ?\[ + ?\( ?\) ?< ?> ?@ ?, ?\; ?: ?\\ ?\" - ?. ?\[ ?\])) + ?.)) (defconst std11-atom-regexp (` (, (concat "^[^" std11-special-char-list std11-space-chars "]+"))))