tm 7.73.

[elisp/tm.git] / tm-edit.el

diff --git a/tm-edit.el b/tm-edit.el
index a1061a5..2852cb7 100644 (file)
--- a/tm-edit.el
+++ b/tm-edit.el
@@ -8,7 +8,7 @@
 ;;;         MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Created: 1994/08/21 renamed from mime.el
-;;; Version: $Revision: 7.72 $
+;;; Version: $Revision: 7.73 $
 ;;; Keywords: mail, news, MIME, multimedia, multilingual
 ;;;
 ;;; This file is part of tm (Tools for MIME).
@@ -122,7 +122,7 @@
 ;;;
 
 (defconst mime-editor/RCS-ID
-  "$Id: tm-edit.el,v 7.72 1996/07/15 08:19:01 morioka Exp $")
+  "$Id: tm-edit.el,v 7.73 1996/07/22 19:29:42 morioka Exp $")
 
 (defconst mime-editor/version (get-version-string mime-editor/RCS-ID))
 
@@ -502,7 +502,6 @@ Each elements are regexp of field-name. [tm-edit.el]")
 ;;;
 
 (defvar mime/editor-mode-old-local-map nil)
-(defvar mime/editor-mode-old-selective-display nil)
 (defvar mime/editing-buffer nil)
 
 \f
@@ -665,32 +664,46 @@ Tspecials means any character that matches with it in header must be quoted.")
   "MIME minor mode for editing the tagged MIME message.
 
 In this mode, basically, the message is composed in the tagged MIME
-format.  The message tag looks like:
+format. The message tag looks like:
 
        `--[[text/plain; charset=ISO-2022-JP][7bit]]'.
 
 The tag specifies the MIME content type, subtype, optional parameters
-and transfer encoding of the message following the tag.  Messages
-without any tag are treated as `text/plain' by default.  Charset and
+and transfer encoding of the message following the tag. Messages
+without any tag are treated as `text/plain' by default. Charset and
 transfer encoding are automatically defined unless explicitly
-specified.  Binary messages such as audio and image are usually hidden
-using selective-display facility.  The messages in the tagged MIME
-format are automatically translated into a MIME compliant message when
-exiting this mode.
+specified. Binary messages such as audio and image are usually hidden.
+The messages in the tagged MIME format are automatically translated
+into a MIME compliant message when exiting this mode.
 
-Available charsets depend on Emacs version being used.  The following
+Available charsets depend on Emacs version being used. The following
 lists the available charsets of each emacs.
 
-Emacs18:       US-ASCII is only available.
+EMACS 18:      US-ASCII is only available.
 NEmacs:                US-ASCII and ISO-2022-JP are available.
-Emacs19:       US-ASCII and ISO-8859-1 are available.
-Mule:          US-ASCII, ISO-8859-* (except for ISO-8859-6),
-               ISO-2022-JP, ISO-2022-JP-2 and ISO-2022-INT-1 are available.
-
-ISO-2022-JP-2 and ISO-2022-INT-1 charsets used in Mule is expected to
-be used to represent multilingual text in intermixed manner.  Any
+EMACS 19:      US-ASCII and ISO-8859-1 (or other charset) are available.
+XEmacs 19:     US-ASCII and ISO-8859-1 (or other charset) are available.
+Mule:          US-ASCII, ISO-8859-* (except for ISO-8859-5), KOI8-R,
+               ISO-2022-JP, ISO-2022-JP-2, ISO-2022-KR, BIG5 and
+               ISO-2022-INT-1 are available.
+
+ISO-2022-JP-2 and ISO-2022-INT-1 charsets used in mule is expected to
+be used to represent multilingual text in intermixed manner. Any
 languages that has no registered charset are represented as either
-ISO-2022-JP-2 or ISO-2022-INT-1 in Mule.
+ISO-2022-JP-2 or ISO-2022-INT-1 in mule.
+
+If you want to use non-ISO-8859-1 charset in EMACS 19 or XEmacs 19,
+please set variable `default-mime-charset'. This variable must be
+symbol of which name is a MIME charset.
+
+If you want to add more charsets in mule, please set variable
+`charsets-mime-charset-alist'. This variable must be alist of which
+key is list of leading-char/charset and value is symbol of MIME
+charset. (leading-char is a term of MULE 1.* and 2.*. charset is a
+term of XEmacs/mule, mule merged EMACS and MULE 3.*) If name of
+coding-system is different as MIME charset, please set variable
+`mime-charset-coding-system-alist'. This variable must be alist of
+which key is MIME charset and value is coding-system.
 
 Following commands are available in addition to major mode commands:
 \\[mime-editor/insert-text]    insert a text message.
@@ -798,10 +811,8 @@ User customizable variables (not documented all of them):
           ))
     ;; end
     
-    ;; Remember old selective-display.
-    (make-local-variable 'mime/editor-mode-old-selective-display)
-    (setq mime/editor-mode-old-selective-display selective-display)
-    (setq selective-display t)
+    (enable-invisible)
+    
     ;; I don't care about saving these.
     (setq paragraph-start
          (regexp-or mime-editor/single-part-tag-regexp
@@ -839,7 +850,7 @@ just return to previous mode."
          (t
           (use-local-map mime/editor-mode-old-local-map)))
     
-    (setq selective-display mime/editor-mode-old-selective-display)
+    (end-of-invisible)
     (set-buffer-modified-p (buffer-modified-p))
     (run-hooks 'mime-editor/exit-hook)
     (message "Exit MIME editor mode.")