X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mime-edit.el;h=bfcc6a82bb220d81c0b74834c4569a3b338f0d09;hb=584179bd3daff862acde65a1e9b646ebf69dd3a2;hp=18263bf953de8c99cdf2a48e1945b8cac3cf2b28;hpb=5b8331d526ed5334feb7450638897b1cd81fa581;p=elisp%2Fsemi.git

diff --git a/mime-edit.el b/mime-edit.el
index 18263bf..bfcc6a8 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -236,6 +236,8 @@ To insert a signature file automatically, call the function
     ("application"
      ("octet-stream" ("type" "" "tar" "shar"))
      ("postscript")
+     ("msword")
+     ("vnd.ms-excel")
      ("vnd.ms-powerpoint")
      ("x-kiss" ("x-cnf")))
     ("image"
@@ -321,6 +323,11 @@ To insert a signature file automatically, call the function
      "base64"
      "attachment" (("filename" . file))
      )
+    ("\\.xls$"				; MS Excel
+     "application" "vnd.ms-excel" nil
+     "base64"
+     "attachment" (("filename" . file))
+     )
     ("\\.ppt$"				; MS Power Point
      "application" "vnd.ms-powerpoint" nil
      "base64"
@@ -2302,9 +2309,10 @@ Content-Description: S/MIME Encrypted Message][base64]]\n")
 		    (narrow-to-region beg (mime-edit-content-end))
 		    (goto-char beg)
 		    (while (re-search-forward "\\(\\=\\|[^\r]\\)\n" nil t)
-		      ;; Don't use this in the multibyte buffer since it may
-		      ;; convert the unibyte string into multibyte.
-		      ;;;;(replace-match "\\1\r\n"))))
+		      ;; In a certain period, `replace-match' with "\\N"
+		      ;; converted 8-bit characters into multibyte string,
+		      ;; but it has been fixed at 2004-01-15.
+		      ;;(replace-match "\\1\r\n"))))
 		      (backward-char 1)
 		      (insert "\r")
 		      (forward-char 1))))