diff -c wremi-1_14-unofficial-200007121347/mime-edit.el nisemi-1.14.0/mime-edit.el
*** wremi-1_14-unofficial-200007121347/mime-edit.el	Fri Jun 23 20:45:36 2000
--- nisemi-1.14.0/mime-edit.el	Wed Jul 12 14:13:31 2000
***************
*** 207,213 ****
       ("css") ; rfc2318
       ("xml") ; rfc2376
       ("x-latex")
!      ;; ("x-rot13-47-48")
       )
      ("message"
       ("external-body"
--- 207,213 ----
       ("css") ; rfc2318
       ("xml") ; rfc2376
       ("x-latex")
!      ("x-rot13-47-48")
       )
      ("message"
       ("external-body"
diff -c wremi-1_14-unofficial-200007121347/mime-view.el nisemi-1.14.0/mime-view.el
*** wremi-1_14-unofficial-200007121347/mime-view.el	Thu Jun 22 06:54:04 2000
--- nisemi-1.14.0/mime-view.el	Wed Jul 12 14:18:44 2000
***************
*** 671,676 ****
--- 671,688 ----
  
  (ctree-set-calist-strictly
   'mime-preview-condition
+  '((type . text)(subtype . x-rot13-47-48)
+    (body . visible)
+    (body-presentation-method . mime-display-text/x-rot13-47-48)))
+ 
+ (ctree-set-calist-strictly
+  'mime-preview-condition
+  '((type . text)(subtype . x-vcard)
+    (body . visible)
+    (body-presentation-method . mime-display-text/x-vcard)))
+ 
+ (ctree-set-calist-strictly
+  'mime-preview-condition
   '((type . application)(subtype . x-postpet)
     (body . visible)
     (body-presentation-method . mime-display-application/x-postpet)))
***************
*** 718,723 ****
--- 730,768 ----
  
  ;;; @@@ entity presentation
  ;;;
+ 
+ (defun mime-display-text/x-rot13-47-48 (entity situation)
+   (save-restriction
+     (narrow-to-region (point-max)(point-max))
+     (mime-insert-text-content entity)
+     (run-hooks 'mime-text-decode-hook)
+     (let ((beg (point-min)))
+       (remove-text-properties beg (point-max) '(face nil))
+       (mule-caesar-region beg (point-max)))))
+ 
+ (defun mime-display-text/x-vcard (entity situation)
+   (save-restriction
+     (narrow-to-region (point-max)(point-max))
+     (insert (string-as-multibyte (mime-entity-content entity)))
+     (goto-char (point-min))
+     (while (re-search-forward
+             "\\(;\\(encoding=\\)?quoted-printable:\\)\\(\\(=[0-9A-F][0-9A-F]\\|=\r?\n\\|[^\r\n]\\)*\\)"
+             nil t)
+       (replace-match
+        (concat
+         (buffer-substring (match-beginning 1) (match-end 1))
+         (string-as-multibyte
+          (mime-decode-string
+           (decode-coding-string
+            (buffer-substring (match-beginning 3) (match-end 3)) 'raw-text-dos)
+           "quoted-printable")))
+        t t))
+     (decode-coding-region (point-min) (point-max) 'undecided)
+     (goto-char (point-max))
+     (if (not (eq (char-after (1- (point))) ?\n))
+         (insert "\n"))
+     (mime-add-url-buttons)
+     (run-hooks 'mime-display-text/x-vcard-hook)))
  
  (defun mime-display-text/plain (entity situation)
    (save-restriction
diff -c wremi-1_14-unofficial-200007121347/semi-def.el nisemi-1.14.0/semi-def.el
*** wremi-1_14-unofficial-200007121347/semi-def.el	Wed Jul 12 12:30:00 2000
--- nisemi-1.14.0/semi-def.el	Wed Jul 12 14:21:03 2000
***************
*** 1,4 ****
! ;;; semi-def.el --- definition module for WEMI -*- coding: iso-8859-4; -*-
  
  ;; Copyright (C) 1995,96,97,98,99,2000 Free Software Foundation, Inc.
  
--- 1,4 ----
! ;;; semi-def.el --- definition module for SEMI -*- coding: iso-2022-jp; -*-
  
  ;; Copyright (C) 1995,96,97,98,99,2000 Free Software Foundation, Inc.
  
***************
*** 28,34 ****
  (eval-when-compile (require 'cl))
  (require 'custom)
  
! (defconst mime-user-interface-product ["WREMI" (1 14 2) "Hokuhoku-̉shima"]
    "Product name, version number and code name of MIME-kernel package.")
  
  (autoload 'mule-caesar-region "mule-caesar"
--- 28,34 ----
  (eval-when-compile (require 'cl))
  (require 'custom)
  
! (defconst mime-user-interface-product ["NISEMI" (1 14 0) "$(B0f8}@?(B"]
    "Product name, version number and code name of MIME-kernel package.")
  
  (autoload 'mule-caesar-region "mule-caesar"