From: morioka <morioka>
Date: Wed, 5 Mar 1997 17:34:50 +0000 (+0000)
Subject: `mime-prefix' -> `mime-edit-prefix'.
X-Git-Tag: Hokutetsu-Ishikawa-new~180
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4ff1a98ae276f87f3b40f4546fcf5b3a37fd0fb9;p=elisp%2Fsemi.git

`mime-prefix' -> `mime-edit-prefix'.
---

diff --git a/mime-edit.el b/mime-edit.el
index 40e2377..ffe413e 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -7,7 +7,7 @@
 ;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1994/08/21 renamed from mime.el
 ;;	Renamed: 1997/2/21 from tm-edit.el
-;; Version: $Revision: 0.60 $
+;; Version: $Revision: 0.61 $
 ;; Keywords: MIME, multimedia, multilingual, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -122,7 +122,7 @@
 ;;;
 
 (defconst mime-edit-RCS-ID
-  "$Id: mime-edit.el,v 0.60 1997-03-04 13:03:32 morioka Exp $")
+  "$Id: mime-edit.el,v 0.61 1997-03-05 17:34:50 morioka Exp $")
 
 (defconst mime-edit-version (get-version-string mime-edit-RCS-ID))
 
@@ -133,8 +133,8 @@
 ;;; @ variables
 ;;;
 
-(defvar mime-prefix "\C-c\C-x"
-  "*Keymap prefix for MIME commands.")
+(defvar mime-edit-prefix "\C-c\C-x"
+  "*Keymap prefix for MIME-Edit commands.")
 
 (defvar mime-ignore-preceding-spaces nil
   "*Ignore preceding white spaces if non-nil.")
@@ -594,7 +594,7 @@ Tspecials means any character that matches with it in header must be quoted.")
 	     (setq mime-edit-minor-mime-map 
 		   (make-sparse-keymap 'mime-edit-minor-mime-map))
 	     (define-key
-	       mime-edit-minor-mime-map mime-prefix mime-edit-mime-map)
+	       mime-edit-minor-mime-map mime-edit-prefix mime-edit-mime-map)
 	     ))
        (add-minor-mode 'mime-edit-mode-flag
 		       '((" MIME-Edit "  mime-transfer-level-string))
@@ -790,7 +790,7 @@ TABs at the beginning of the line are not a part of the message:
 	--[[audio/basic][base64]]...audio encoded in base64 here...
 
 User customizable variables (not documented all of them):
- mime-prefix
+ mime-edit-prefix
     Specifies a key prefix for MIME minor mode commands.
 
  mime-ignore-preceding-spaces
@@ -838,8 +838,8 @@ User customizable variables (not documented all of them):
       (use-local-map (copy-keymap (or (current-local-map)
 				      (make-sparse-keymap))))
       )
-    (if (not (lookup-key (current-local-map) mime-prefix))
-	(define-key (current-local-map) mime-prefix mime-edit-mime-map))
+    (if (not (lookup-key (current-local-map) mime-edit-prefix))
+	(define-key (current-local-map) mime-edit-prefix mime-edit-mime-map))
 
     ;; Set transfer level into mode line
     ;;