From 9373b4b852dd351b181bc229721f04b1e51eca45 Mon Sep 17 00:00:00 2001 From: morioka Date: Sun, 10 May 1998 00:51:34 +0000 Subject: [PATCH] Abolish 'symbol-concat because it is not used. --- mime-parse.el | 10 ---------- 1 file changed, 10 deletions(-) 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 ;;; -- 1.7.10.4