WEMI 1.10.0 - "Shin-Kambara": Sync up with semi-1_10.
authoryamaoka <yamaoka>
Mon, 19 Oct 1998 00:46:24 +0000 (00:46 +0000)
committeryamaoka <yamaoka>
Mon, 19 Oct 1998 00:46:24 +0000 (00:46 +0000)
ChangeLog
NEWS
VERSION
mime-edit.el
mime-play.el
mime-text.el
mime-w3.el
semi-def.el

index df71b4e..ddac0e0 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,37 @@
+1998-10-16  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * mime-edit.el (mime-edit-decode-buffer): Call
+       `mule-caesar-region' for text/x-rot13-47-48 entity.
+
+1998-09-22  Shozo UEHARA      <uehara@eken.phys.nagoya-u.ac.jp>
+
+       * mime-play.el (mime-raw-play-entity): Initialize `max-escore' by
+       0. <cf. [tm-ja:3432]>
+
+1998-10-16  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * NEWS (Changes in SEMI 1.10): New section.
+
+       * NEWS (Changes in SEMI 1.9): New section.
+
+       * NEWS (User-Agent field): New subsection.
+
+1998-10-16  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * mime-play.el (mime-view-caesar): Use `mime-insert-text-content'
+       instead of `mime-text-insert-decoded-body'.
+
+       * mime-w3.el (mime-preview-text/html): Use
+       `mime-insert-text-content' instead of
+       `mime-text-insert-decoded-body'.
+
+       * mime-text.el: Abolish function `mime-text-insert-decoded-body'.
+       (mime-display-text/plain): Use `mime-insert-text-content' instead
+       of `mime-text-insert-decoded-body'.
+       (mime-display-text/richtext): Likewise.
+       (mime-display-text/enriched): Likewise.
+
+\f
 1998-10-14  Katsumi Yamaoka   <yamaoka@jpl.org>
 
        * WEMI: Version 1.9.1 (Fujikawa) released.
        `mime-product-name', `mime-product-version' and
        `mime-product-code-name'.
 
-       * semi-def.el (mime-user-interface-product): New variable; abolish
+       * semi-def.el (mime-user-interface-product): New constant; abolish
        `mime-user-interface-version'.
 
 1998-10-04  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
diff --git a/NEWS b/NEWS
index febedc3..50bf1d8 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -1,6 +1,46 @@
 SEMI NEWS --- history of major-changes.
 Copyright (C) 1998 Free Software Foundation, Inc.
 
+* Changes in SEMI 1.10
+
+** Function `mime-text-insert-decoded-body' was abolished
+
+  SEMI 1.9 uses `mime-insert-text-content' of FLIM 1.11 API instead of
+`mime-text-insert-decoded-body'.
+
+  Now `mime-view-caesar' does not run `mime-text-decode-hook'.
+
+
+* Changes in SEMI 1.9
+
+** User option `mime-encoding-list'
+
+  SEMI 1.9 requires FLIM 1.10 API.  In FLIM 1.10 API, variable
+`mime-file-encoding-method-alist' was abolished.  If you want to use
+non-standard Content-Transfer-Encoding to insert a file into sending
+message, please edit new user option `mime-encoding-list' instead of
+`mime-file-encoding-method-alist'.
+
+
+** Constant `mime-user-interface-product'
+
+  Constant `mime-user-interface-version' was renamed to
+`mime-user-interface-product'.  Notice that data format is changed
+too.
+
+  FLIM 1.10 API provides following macros to access a slot of the new
+data format:
+
+     mime-product-name (product)
+
+     mime-product-version (product)
+
+     mime-product-code-name (product)
+
+Please use them to get elements of the constant
+`mime-user-interface-product'.
+
+
 * Changes in SEMI 1.8
 
 ** Don't use "file" command to detect content of entity
@@ -39,6 +79,15 @@ value were ignored.  On the other hand,
 `request-partial-message-method' is required to return structure of
 message at current summary line.  Format of it is mime-entity.
 
+
+** User-Agent field
+
+  MIME-Edit inserts User-Agent field instaed of X-Emacs field if
+`mime-edit-insert-user-agent-field' is not nil.  Contents of
+User-Agent is specified by mime-edit-user-agent-value'.
+
+  X-Emacs field related features were abolished.
+
 \f
 * Changes in SEMI 1.7
 
diff --git a/VERSION b/VERSION
index 4d0280b..09b16cd 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -67,7 +67,7 @@
 1.8.6  Fukuoka                 \e$(BJ!2,\e(B
 1.9.0  Isurugi                 \e$(B@PF0\e(B
 1.9.1  Kurikara                \e$(B6fMx2@Me\e(B
------  Tsubata                 \e$(BDEH(\e(B
+1.10.0 Tsubata                 \e$(BDEH(\e(B
 -----  Morimoto                \e$(B?9K\\e(B
 -------        Higashi-Kanazawa        \e$(BEl6bBt\e(B
 -------        Kanazawa                \e$(B6bBt\e(B             ; <=> \e$(BKLN&E4F;\e(B \e$(BKLE46bBt\e(B
 1.8.6  Yoshiwara               \e$(B5H86\e(B     ; = \e$(B3YFnE4F;\e(B
 1.9.0  Fuji                    \e$(BIY;N\e(B     ; = JR \e$(B?H1d@~\e(B
 1.9.1  Fujikawa                \e$(BIY;N@n\e(B
------  Shin-Kambara            \e$(B?73w86\e(B
------  Kambara                 \e$(B3w86\e(B
------  Yui                     \e$(BM3Hf\e(B
------  Okitsu                  \e$(B6=DE\e(B
------  Shimizu                 \e$(B@6?e\e(B
------  Kusanagi                \e$(BApFe\e(B
------  Shizuoka                \e$(B@E2,\e(B
------  Abekawa                 \e$(B0BG\@n\e(B
------  Mochimune               \e$(BMQ=!\e(B
------  Yaizu                   \e$(B>FDE\e(B
------  Nishi-Yaizu             \e$(B@>>FDE\e(B
------  Fijieda                 \e$(BF#;^\e(B
------  Rokug\e-Dò\e-A                    \e$(BO;9g\e(B
------  Shimada                 \e$(BEgED\e(B
------  Kanaya                  \e$(B6bC+\e(B     ; = \e$(BBg0f@nE4F;\e(B
------  Kikugawa                \e$(B5F@n\e(B
------  Kakegawa                \e$(B3]@n\e(B     ; = \e$(BE7N5IML>8PE4F;\e(B
+1.10.0 Shin-Kambara            \e$(B?73w86\e(B
+------ Kambara                 \e$(B3w86\e(B
+------ Yui                     \e$(BM3Hf\e(B
+------ Okitsu                  \e$(B6=DE\e(B
+------ Shimizu                 \e$(B@6?e\e(B
+------ Kusanagi                \e$(BApFe\e(B
+------ Shizuoka                \e$(B@E2,\e(B
+------ Abekawa                 \e$(B0BG\@n\e(B
+------ Mochimune               \e$(BMQ=!\e(B
+------ Yaizu                   \e$(B>FDE\e(B
+------ Nishi-Yaizu             \e$(B@>>FDE\e(B
+------ Fijieda                 \e$(BF#;^\e(B
+------ Rokug\e-Dò\e-A                    \e$(BO;9g\e(B
+------ Shimada                 \e$(BEgED\e(B
+------ Kanaya                  \e$(B6bC+\e(B     ; = \e$(BBg0f@nE4F;\e(B
+------ Kikugawa                \e$(B5F@n\e(B
+------ Kakegawa                \e$(B3]@n\e(B     ; = \e$(BE7N5IML>8PE4F;\e(B
 :      :                       :
------  Kanayama                \e$(B6b;3\e(B     ; =\e$(B!J\e(BJR \e$(BCf1{K\@~!K\e(B
------  Ot\e-Dòbashi\e-A          \e$(BHxF,66\e(B
------  Nagoya                  \e$(BL>8E20\e(B   ; = JR \e$(B4X@>K\@~!J!&Cf1{K\@~!K\e(B
+------ Kanayama                \e$(B6b;3\e(B     ; =\e$(B!J\e(BJR \e$(BCf1{K\@~!K\e(B
+------ Ot\e-Dòbashi\e-A          \e$(BHxF,66\e(B
+------ Nagoya                  \e$(BL>8E20\e(B   ; = JR \e$(B4X@>K\@~!J!&Cf1{K\@~!K\e(B
 :      :                       :
------  Gifu                    \e$(B4tIl\e(B     ; = JR \e$(B9b;3K\@~\e(B
+------ Gifu                    \e$(B4tIl\e(B     ; = JR \e$(B9b;3K\@~\e(B
 :      :                       :
------  Samegai                 \e$(B@C%v0f\e(B
+------ Samegai                 \e$(B@C%v0f\e(B
 ;;-------------------------------------------------------------------------
 ;;     West Japan Railway      \e$(B@>F|K\N95RE4F;\e(B   http://www.westjr.co.jp/
 ;;-------------------------------------------------------------------------
------  Maibara                 \e$(BJF86\e(B     ; = JR \e$(BKLN&K\@~\e(B
+------ Maibara                 \e$(BJF86\e(B     ; = JR \e$(BKLN&K\@~\e(B
 :      :                       :
------  Kusatsu                 \e$(BApDE\e(B     ; = JR \e$(BApDE@~\e(B
+------ Kusatsu                 \e$(BApDE\e(B     ; = JR \e$(BApDE@~\e(B
 :      :                       :
------  Yamashina               \e$(B;32J\e(B     ; = JR \e$(B8P@>@~\e(B
------  Ky\e-Dòto\e-A                     \e$(B5~ET\e(B     ; = JR \e$(BF`NI@~!&;31"K\@~\e(B
+------ Yamashina               \e$(B;32J\e(B     ; = JR \e$(B8P@>@~\e(B
+------ Ky\e-Dòto\e-A                     \e$(B5~ET\e(B     ; = JR \e$(BF`NI@~!&;31"K\@~\e(B
                                        ; <=> \e$(B6aE4\e(B \e$(B5~ET@~!"5~ET;T8rDL6I\e(B \e$(B1(4]@~\e(B
 :      :                       :
------  \e-DÒsaka\e-A                     \e$(BBg:e\e(B     ; = JR \e$(BBg:e4D>u@~\e(B <=> JR \e$(BEl@>@~\e(B \e$(BKL?7CO\e(B
+------ \e-DÒsaka\e-A                     \e$(BBg:e\e(B     ; = JR \e$(BBg:e4D>u@~\e(B <=> JR \e$(BEl@>@~\e(B \e$(BKL?7CO\e(B
                                        ;   <=> \e$(BBg:e;T8rDL6I!":e?@!":e5^\e(B \e$(BG_ED\e(B
 :      :                       :
------  K\e-Dòbe\e-A                      \e$(B?@8M\e(B     ; = JR \e$(B;3M[K\@~\e(B
+------ K\e-Dòbe\e-A                      \e$(B?@8M\e(B     ; = JR \e$(B;3M[K\@~\e(B
 
 
 [REMI version names]
index eab91e7..ff83978 100644 (file)
@@ -2689,6 +2689,10 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
                           (match-end 0)
                         (point-min)
                         )))
+                 (if (and (eq type 'text)
+                          (eq stype 'x-rot13-47-48))
+                     (mule-caesar-region he (point-max))
+                   )
                  (if (= (point-min) 1)
                      (progn
                        (goto-char he)
index 2e921fb..11fc355 100644 (file)
@@ -229,7 +229,7 @@ specified, play as it.  Default MODE is \"play\"."
        (if (cdr ret)
            (let ((rest ret)
                  (max-score 0)
-                 max-escore
+                 (max-escore 0)
                  max-examples
                  max-situations)
              (while rest
@@ -705,7 +705,7 @@ It is registered to variable `mime-preview-quitting-method-alist'."
       )
     (setq buffer-read-only nil)
     (erase-buffer)
-    (mime-text-insert-decoded-body entity)
+    (mime-insert-text-content entity)
     (mule-caesar-region (point-min) (point-max))
     (set-buffer-modified-p nil)
     (set-buffer mother)
index e107222..37ba1c6 100644 (file)
 (autoload 'widget-convert-text "wid-edit")
 
 
-;;; @ code conversion
-;;;
-
-(defun mime-text-insert-decoded-body (entity)
-  "Insert text body of ENTITY in SITUATION.
-It decodes MIME-encoding then code-converts as MIME-charset.
-MIME-encoding is value of field 'encoding of SITUATION.  It must be
-'nil or string.  MIME-charset is value of field \"charset\" of
-SITUATION.  It must be symbol."
-  (let ((str (mime-entity-content entity)))
-    (insert
-     (if (and (mime-entity-cooked-p entity)
-             (member (mime-entity-encoding entity)
-                     '(nil "7bit" "8bit" "binary")))
-        str
-       (decode-mime-charset-string str
-                                  (or (mime-content-type-parameter
-                                       (mime-entity-content-type entity)
-                                       "charset")
-                                      default-mime-charset)
-                                  'CRLF)
-       )))
-  (run-hooks 'mime-text-decode-hook)
-  )
-
-
 ;;; @ content filters for mime-text
 ;;;
 
 (defun mime-display-text/plain (entity situation)
   (save-restriction
     (narrow-to-region (point-max)(point-max))
-    (mime-text-insert-decoded-body entity)
+    (mime-insert-text-content entity)
+    (run-hooks 'mime-text-decode-hook)
     (goto-char (point-max))
     (if (not (eq (char-after (1- (point))) ?\n))
        (insert "\n")
@@ -72,7 +47,8 @@ SITUATION.  It must be symbol."
 (defun mime-display-text/richtext (entity situation)
   (save-restriction
     (narrow-to-region (point-max)(point-max))
-    (mime-text-insert-decoded-body entity)
+    (mime-insert-text-content entity)
+    (run-hooks 'mime-text-decode-hook)
     (let ((beg (point-min)))
       (remove-text-properties beg (point-max) '(face nil))
       (richtext-decode beg (point-max))
@@ -81,7 +57,8 @@ SITUATION.  It must be symbol."
 (defun mime-display-text/enriched (entity situation)
   (save-restriction
     (narrow-to-region (point-max)(point-max))
-    (mime-text-insert-decoded-body entity)
+    (mime-insert-text-content entity)
+    (run-hooks 'mime-text-decode-hook)
     (let ((beg (point-min)))
       (remove-text-properties beg (point-max) '(face nil))
       (enriched-decode beg (point-max))
index fec612c..d9c1948 100644 (file)
@@ -51,7 +51,8 @@
     (mime-save-background-color
      (save-restriction
        (narrow-to-region p p)
-       (mime-text-insert-decoded-body entity)
+       (mime-insert-text-content entity)
+       (run-hooks 'mime-text-decode-hook)
        (w3-region p (point-max))
        (mime-put-keymap-region p (point-max) w3-mode-map)
        ))))
index aefe191..48637c3 100644 (file)
@@ -30,7 +30,7 @@
 
 (require 'custom)
 
-(defconst mime-user-interface-product '["WEMI" (1 9 1) "Fujikawa"]
+(defconst mime-user-interface-product '["WEMI" (1 10 0) "Shin-Kambara"]
   "Implementation name, version name and numbers of MIME-kernel package.")
 
 (autoload 'mule-caesar-region "mule-caesar"