From: yamaoka <yamaoka>
Date: Wed, 2 Dec 1998 02:38:48 +0000 (+0000)
Subject: Sync up with the latest semi-1_12.
X-Git-Tag: wemi-199812021900
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=cb6f7f571c54594337a8b090965f2b54ebe6b164;p=elisp%2Fsemi.git

Sync up with the latest semi-1_12.
---

diff --git a/ChangeLog b/ChangeLog
index b52865a..0a095e0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,16 @@
+1998-11-30  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+	* mime-edit.el (eliminate-top-spaces): New function (moved from
+	mime-def.el of FLIM).
+
+1998-11-17  Kazuhiro Ohta     <ohta@ele.cst.nihon-u.ac.jp>
+
+	* mime-partial.el
+	(mime-combine-message/partial-pieces-automatically): Fix
+	DOC-string.
+
+	* mime-view.el (mime-view-buffer): Fix DOC-string.
+
 1998-11-25  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
 	* NEWS (Changes in SEMI 1.11): New section.
diff --git a/VERSION b/VERSION
index 1d92e23..e22bf9a 100644
--- a/VERSION
+++ b/VERSION
@@ -71,7 +71,7 @@
 1.10.1	Morimoto		$(B?9K\(B
 1.10.2	Higashi-Kanazawa	$(BEl6bBt(B
 1.11.0	Kanazawa		$(B6bBt(B		; <=> $(BKLN&E4F;(B $(BKLE46bBt(B
-1.11.1	Nishi-Kanazawa		$(B@>6bBt(B		; <=> $(BKLN&E4F;(B $(B?7@>6bBt(B
+1.12.0	Nishi-Kanazawa		$(B@>6bBt(B		; <=> $(BKLN&E4F;(B $(B?7@>6bBt(B
 -------	(JR) Nonoichi		$(BLn!9;T(B
 :	:			:
 -------	Tsuruga			$(BFX2l(B		; = JR $(B>.IM@~(B
@@ -132,7 +132,7 @@
 1.10.1	Kambara			$(B3w86(B
 1.10.2	Yui			$(BM3Hf(B
 1.11.0	Okitsu			$(B6=DE(B
-1.11.1	Shimizu			$(B@6?e(B
+1.12.0	Shimizu			$(B@6?e(B
 ------	Kusanagi		$(BApFe(B
 ------	Shizuoka		$(B@E2,(B
 ------	Abekawa			$(B0BG\@n(B
diff --git a/mime-edit.el b/mime-edit.el
index 873c5bf..56ee40b 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -2589,6 +2589,12 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
 	  "\\):")
   "Regexp for deleted header fields when `mime-edit-again' is called.")
 
+(defsubst eliminate-top-spaces (string)
+  "Eliminate top sequence of space or tab in STRING."
+  (if (string-match "^[ \t]+" string)
+      (substring string (match-end 0))
+    string))
+
 (defun mime-edit-decode-multipart-in-buffer (content-type not-decode-text)
   (let* ((subtype (mime-content-type-subtype content-type))
 	 (boundary (mime-content-type-parameter content-type "boundary"))
diff --git a/mime-partial.el b/mime-partial.el
index e085eab..14b3ff9 100644
--- a/mime-partial.el
+++ b/mime-partial.el
@@ -30,9 +30,7 @@
 
 (defun mime-combine-message/partial-pieces-automatically (entity situation)
   "Internal method for mime-view to combine message/partial messages
-automatically.  This function refers variable
-`mime-request-partial-message-method-alist' to select function to display
-partial messages using mime-view."
+automatically."
   (interactive)
   (let* ((id (cdr (assoc "id" situation)))
 	 (target (cdr (assq 'major-mode situation)))
diff --git a/mime-view.el b/mime-view.el
index 1892847..f3c2577 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -939,7 +939,7 @@ to it.  If it is a function, it will be bound as default binding of
 keymap of MIME-View mode.
 Optional argument REPRESENTATION-TYPE is representation-type of
 message.  It must be nil, `binary' or `cooked'.  If it is nil,
-`binary' is used as default."
+`cooked' is used as default."
   (interactive)
   (or raw-buffer
       (setq raw-buffer (current-buffer)))
diff --git a/semi-def.el b/semi-def.el
index ed288bd..14edeb6 100644
--- a/semi-def.el
+++ b/semi-def.el
@@ -30,7 +30,7 @@
 
 (require 'custom)
 
-(defconst mime-user-interface-product ["WEMI" (1 11 1) "Shimizu"]
+(defconst mime-user-interface-product ["WEMI" (1 12 0) "Shimizu"]
   "Implementation name, version name and numbers of MIME-kernel package.")
 
 (autoload 'mule-caesar-region "mule-caesar"