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

diff --git a/mime-edit.el b/mime-edit.el
index 40e2377..ffe413e 100644 (file)
--- 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
     ;;