From b31fc06ca8a6278c333d1fec5c63a035cc7ea86b Mon Sep 17 00:00:00 2001 From: tmorioka Date: Tue, 25 Feb 1997 06:18:07 +0000 Subject: [PATCH] Function `mime/encoding-name' was moved from mime-def.el. --- mime-edit.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/mime-edit.el b/mime-edit.el index 2b65e20..8f33c2b 100644 --- a/mime-edit.el +++ b/mime-edit.el @@ -7,7 +7,7 @@ ;; Maintainer: MORIOKA Tomohiko ;; Created: 1994/08/21 renamed from mime.el ;; Renamed: 1997/2/21 from tm-edit.el -;; Version: $Revision: 0.44 $ +;; Version: $Revision: 0.45 $ ;; Keywords: MIME, multimedia, multilingual, mail, news ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -120,7 +120,7 @@ ;;; (defconst mime-edit-RCS-ID - "$Id: mime-edit.el,v 0.44 1997-02-25 06:15:53 tmorioka Exp $") + "$Id: mime-edit.el,v 0.45 1997-02-25 06:18:07 tmorioka Exp $") (defconst mime-edit-version (get-version-string mime-edit-RCS-ID)) @@ -374,6 +374,12 @@ If encoding is nil, it is determined from its contents.") (iso-2022-int-1 7 "base64") )) +(defsubst mime/encoding-name (transfer-level &optional not-omit) + (cond ((> transfer-level 8) "binary") + ((= transfer-level 8) "8bit") + (not-omit "7bit") + )) + (defvar mime-edit-transfer-level 7 "*A number of network transfer level. It should be bigger than 7.") (make-variable-buffer-local 'mime-edit-transfer-level) -- 1.7.10.4