(mime-module-version): update.

[elisp/semi.git] / semi-def.el

diff --git a/semi-def.el b/semi-def.el
index 9054c31..f928afa 100644 (file)
--- a/semi-def.el
+++ b/semi-def.el
@@ -26,7 +26,7 @@
 
 (require 'emu)
 
-(defconst mime-module-version '("SEMI" "Naoetsu" 1 2 2)
+(defconst mime-module-version '("SEMI" "Nadachi" 1 2 5)
   "Implementation name, version name and numbers of MIME-kernel package.")
 
 (autoload 'mule-caesar-region "mule-caesar"
@@ -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.