From 64036f1a48e58162eebccb2cbe2ae44e220b2051 Mon Sep 17 00:00:00 2001 From: morioka Date: Thu, 28 May 1998 13:37:23 +0000 Subject: [PATCH] Move 'regexp-* and 'regexp-or to mime-def.el of FLIM (Chao). --- mime-parse.el | 16 ---------------- 1 file changed, 16 deletions(-) diff --git a/mime-parse.el b/mime-parse.el index 2753487..19cd2e7 100644 --- a/mime-parse.el +++ b/mime-parse.el @@ -32,22 +32,6 @@ ;;; @ field parser ;;; -(defsubst regexp-* (regexp) - (concat regexp "*")) - -(defsubst regexp-or (&rest args) - (concat "\\(" (mapconcat (function identity) args "\\|") "\\)")) - -(defconst std11-quoted-pair-regexp "\\\\.") -(defconst std11-qtext-regexp - (concat "[^" (char-list-to-string std11-non-qtext-char-list) "]")) -(defconst std11-quoted-string-regexp - (concat "\"" - (regexp-* - (regexp-or std11-qtext-regexp std11-quoted-pair-regexp) - ) - "\"")) - (defconst mime/content-parameter-value-regexp (concat "\\(" std11-quoted-string-regexp -- 1.7.10.4