;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: mime-def.el,v 0.58 1997-07-07 17:01:49 morioka Exp $
+;; Version: $Id: mime-def.el,v 0.59 1997-07-26 15:21:10 morioka Exp $
;; Keywords: definition, MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
(require 'cl)
(require 'emu)
-(defconst semi-version-name "Naka-Tsurugi")
+(defconst semi-version-name "Tsurugi")
(autoload 'mule-caesar-region "mule-caesar"
"Caesar rotation of current region." t)
(defconst mime-media-type/subtype-regexp
(concat mime-token-regexp "/" mime-token-regexp))
-(defconst mime-disposition-type-regexp mime-token-regexp)
-
;;; @ button
;;;
;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc.
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: mime-parse.el,v 0.13 1997-07-07 17:08:03 morioka Exp $
+;; Version: $Id: mime-parse.el,v 0.14 1997-07-26 15:21:11 morioka Exp $
;; Keywords: parse, MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
(cons ctype (nreverse dest))
)))
+
+(defconst mime-disposition-type-regexp mime-token-regexp)
+
(defun mime-parse-Content-Disposition (string)
"Parse STRING as field-body of Content-Disposition field."
(setq string (std11-unfold-string string))