projects
/
elisp
/
flim.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
release.
[elisp/flim.git]
/
mime-def.el
diff --git
a/mime-def.el
b/mime-def.el
index
267810b
..
35bda0d
100644
(file)
--- a/
mime-def.el
+++ b/
mime-def.el
@@
-32,8
+32,6
@@
(require 'mcharset)
(require 'alist)
(require 'mcharset)
(require 'alist)
-(eval-when-compile (require 'cl)) ; list*
-
(eval-and-compile
(defconst mime-library-product ["CLIME" (1 13 3) "
\e
$BJ?C<
\e
(B"]
"Product name, version number and code name of MIME-library package.")
(eval-and-compile
(defconst mime-library-product ["CLIME" (1 13 3) "
\e
$BJ?C<
\e
(B"]
"Product name, version number and code name of MIME-library package.")
@@
-155,10
+153,9
@@
;;;
(defsubst make-mime-content-type (type subtype &optional parameters)
;;;
(defsubst make-mime-content-type (type subtype &optional parameters)
- (list* (cons 'type type)
- (cons 'subtype subtype)
- (nreverse parameters))
- )
+ (cons (cons 'type type)
+ (cons (cons 'subtype subtype)
+ (nreverse parameters))))
(defsubst mime-content-type-primary-type (content-type)
"Return primary-type of CONTENT-TYPE."
(defsubst mime-content-type-primary-type (content-type)
"Return primary-type of CONTENT-TYPE."