From 7ca8500e6acf690fbc2f294767f13eccbeb40193 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Fri, 10 Apr 1998 00:40:17 +0000
Subject: [PATCH] (regexp-or): Moved from semi-def.el.

---
 mime-parse.el |    3 +++
 1 file changed, 3 insertions(+)

diff --git a/mime-parse.el b/mime-parse.el
index 493bbcb..ac77bff 100644
--- a/mime-parse.el
+++ b/mime-parse.el
@@ -45,6 +45,9 @@ which are string or symbol."
 (defsubst regexp-* (regexp)
   (concat regexp "*"))
 
+(defsubst regexp-or (&rest args)
+  (concat "\\(" (mapconcat (function identity) args "\\|") "\\)"))
+
 (defconst rfc822/quoted-pair-regexp "\\\\.")
 (defconst rfc822/qtext-regexp
   (concat "[^" (char-list-to-string std11-non-qtext-char-list) "]"))
-- 
1.7.10.4