From: tomo <tomo>
Date: Fri, 18 Feb 2000 08:21:43 +0000 (+0000)
Subject: (mime-view-define-keymap): Change binding of
X-Git-Tag: remi-1_14_1~21
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1e02516527b56a5b7c895a6eeebb060c5ac54413;p=elisp%2Fsemi.git

(mime-view-define-keymap): Change binding of
`mime-preview-toggle-content' from C-c C-t C-b to C-c C-t C-c.
(mime-preview-toggle-content): Renamed from
`mime-preview-toggle-body'.
---

diff --git a/mime-view.el b/mime-view.el
index 5f08648..d51abf7 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -1142,7 +1142,7 @@ MEDIA-TYPE must be (TYPE . SUBTYPE), TYPE or t.  t means default."
     (define-key mime-view-mode-map
       "\C-c\C-t\C-h" (function mime-preview-toggle-header))
     (define-key mime-view-mode-map
-      "\C-c\C-t\C-b" (function mime-preview-toggle-body))
+      "\C-c\C-t\C-c" (function mime-preview-toggle-content))
     (define-key mime-view-mode-map
       "a"        (function mime-preview-follow-current-entity))
     (define-key mime-view-mode-map
@@ -1709,7 +1709,7 @@ If LINES is negative, scroll up LINES lines."
 	(add-to-list 'mime-preview-situation-example-list
 		     (cons situation 0))))))
 
-(defun mime-preview-toggle-body ()
+(defun mime-preview-toggle-content ()
   (interactive)
   (let ((situation (mime-preview-find-boundary-info))
 	entity p-beg p-end)