`mime/temp-buffer-name' -> `mime-temp-buffer-name'.

[elisp/semi.git] / mime-pgp.el

diff --git a/mime-pgp.el b/mime-pgp.el
index e705df1..da89dac 100644 (file)
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -5,7 +5,7 @@
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/12/7
 ;;     Renamed: 1997/2/27 from tm-pgp.el
-;; Version: $Id: mime-pgp.el,v 0.18 1997-03-27 21:17:25 morioka Exp $
+;; Version: $Id: mime-pgp.el,v 0.20 1997-07-02 16:28:49 morioka Exp $
 ;; Keywords: PGP, security, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -103,12 +103,12 @@
     (set-window-buffer p-win mime-view-buffer)
     ))
 
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
           '((type . "application/pgp")
             (method . mime-article/view-application/pgp)
             ))
 
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
           '((type . "text/x-pgp")
             (method . mime-article/view-application/pgp)
             ))
@@ -181,7 +181,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
       (let ((p-min (mime::content-info/point-min oinfo))
            (p-max (mime::content-info/point-max oinfo))
            )
-       (set-buffer (get-buffer-create mime/temp-buffer-name))
+       (set-buffer (get-buffer-create mime-temp-buffer-name))
        (insert-buffer-substring raw-buf p-min p-max)
        )
       (goto-char (point-min))
@@ -198,7 +198,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
                     (and (search-forward "\n\n")
                          (match-end 0))
                     )))
-       (set-buffer (setq kbuf (get-buffer-create mime/temp-buffer-name)))
+       (set-buffer (setq kbuf (get-buffer-create mime-temp-buffer-name)))
        (insert-buffer-substring raw-buf p-min end)
        )
       (mime-decode-region (point-min)(point-max) encoding)
@@ -239,7 +239,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
       (delete-file sig-file)
       )))
 
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
           '((type . "application/pgp-signature")
             (method . mime-article/check-pgp-signature)
             ))
@@ -265,7 +265,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
     (mime-article/view-application/pgp obeg oend cal)
     ))
 
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
           '((type . "application/pgp-encrypted")
             (method . mime-article/decrypt-pgp)
             ))
@@ -294,7 +294,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...")
     (kill-buffer (current-buffer))
     ))
 
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
           '((type . "application/pgp-keys")
             (method . mime-article/add-pgp-keys)
             ))