;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Created: 1994/08/21 renamed from mime.el
;; Renamed: 1997/2/21 from tm-edit.el
-;; Version: $Revision: 0.55 $
+;; Version: $Revision: 0.56 $
;; Keywords: MIME, multimedia, multilingual, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
;;;
(defconst mime-edit-RCS-ID
- "$Id: mime-edit.el,v 0.55 1997-03-04 12:22:39 morioka Exp $")
+ "$Id: mime-edit.el,v 0.56 1997-03-04 12:26:38 morioka Exp $")
(defconst mime-edit-version (get-version-string mime-edit-RCS-ID))
(defvar mime-transfer-level-string
(mime-encoding-name mime-transfer-level 'not-omit)
- "*A string formatted version of mime/defaul-transfer-level")
+ "A string formatted version of mime-transfer-level")
(make-variable-buffer-local 'mime-transfer-level-string)
(defun mime-make-charset-default-encoding-alist (transfer-level)
;;;
(defvar mime-edit-mode-old-local-map nil)
-(defvar mime/editing-buffer nil)
+(defvar mime-edit-buffer nil)
\f
;;; @ constants
(setq major-mode 'mime/temporary-message-mode)
(make-local-variable 'mail-header-separator)
(setq mail-header-separator separator)
- (make-local-variable 'mime/editing-buffer)
- (setq mime/editing-buffer the-buf)
+ (make-local-variable 'mime-edit-buffer)
+ (setq mime-edit-buffer the-buf)
(run-hooks 'mime-edit-translate-hook)
(mime-edit-translate-buffer)
buf)
(mime-view-kill-buffer)
(set-buffer temp)
- (setq buf mime/editing-buffer)
+ (setq buf mime-edit-buffer)
(kill-buffer temp)
(switch-to-buffer buf)
))