From: morioka <morioka>
Date: Thu, 28 May 1998 13:37:23 +0000 (+0000)
Subject: Move 'regexp-* and 'regexp-or to mime-def.el of FLIM (Chao).
X-Git-Tag: remi-1_4_0_91~24
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=64036f1a48e58162eebccb2cbe2ae44e220b2051;p=elisp%2Fsemi.git

Move 'regexp-* and 'regexp-or to mime-def.el of FLIM (Chao).
---

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