From: morioka <morioka>
Date: Sun, 10 May 1998 00:51:34 +0000 (+0000)
Subject: Abolish 'symbol-concat because it is not used.
X-Git-Tag: semi-1_4_3~8
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9373b4b852dd351b181bc229721f04b1e51eca45;p=elisp%2Fsemi.git

Abolish 'symbol-concat because it is not used.
---

diff --git a/mime-parse.el b/mime-parse.el
index ea75f65..c460932 100644
--- a/mime-parse.el
+++ b/mime-parse.el
@@ -28,16 +28,6 @@
 (require 'std11)
 (require 'mime-def)
 
-(defsubst symbol-concat (&rest args)
-  "Return a symbol whose name is concatenation of arguments ARGS
-which are string or symbol."
-  (intern (mapconcat (function
-		      (lambda (s)
-			(cond ((symbolp s) (symbol-name s))
-			      ((stringp s) s)
-			      )))
-		     args "")))
-
 
 ;;; @ field parser
 ;;;