From 166194f2a8ab826e2eaf5d4fab286371c0038099 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Fri, 10 Apr 1998 00:39:00 +0000
Subject: [PATCH] Move 'regexp-or to mime-parse.el. Move 'eliminate-top-spaces
 to mime-def.el.

---
 semi-def.el |    9 ---------
 1 file changed, 9 deletions(-)

diff --git a/semi-def.el b/semi-def.el
index 9054c31..2679a2b 100644
--- a/semi-def.el
+++ b/semi-def.el
@@ -182,9 +182,6 @@ FUNCTION.")
 ;;; @ field
 ;;;
 
-(defsubst regexp-or (&rest args)
-  (concat "\\(" (mapconcat (function identity) args "\\|") "\\)"))
-
 (defun tm:set-fields (sym field-list &optional regexp-sym)
   (or regexp-sym
       (setq regexp-sym
@@ -262,12 +259,6 @@ FUNCTION.")
 ;;; @ Other Utility
 ;;;
 
-(defsubst eliminate-top-spaces (string)
-  "Eliminate top sequence of space or tab in STRING."
-  (if (string-match "^[ \t]+" string)
-      (substring string (match-end 0))
-    string))
-
 (defun call-after-loaded (module func &optional hook-name)
   "If MODULE is provided, then FUNC is called.
 Otherwise func is set to MODULE-load-hook.
-- 
1.7.10.4