From: morioka <morioka>
Date: Fri, 13 Mar 1998 15:32:50 +0000 (+0000)
Subject: (mime-view-menu-list): Modify menu.
X-Git-Tag: semi-1_1_0~102
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=717f37cb5736ce4f8fb546527aa0b5a538bf88b1;p=elisp%2Fsemi.git

(mime-view-menu-list): Modify menu.
---

diff --git a/mime-view.el b/mime-view.el
index 73161fc..feae505 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -665,15 +665,15 @@ The compressed face will be piped to this command.")
 
 (defconst mime-view-menu-title "MIME-View")
 (defconst mime-view-menu-list
-  '((up		 "Move to upper content"      mime-preview-move-to-upper)
-    (previous	 "Move to previous content"   mime-preview-move-to-previous)
-    (next	 "Move to next content"	      mime-preview-move-to-next)
-    (scroll-down "Scroll to previous content" mime-preview-scroll-down-entity)
-    (scroll-up	 "Scroll to next content"     mime-preview-scroll-up-entity)
-    (play	 "Play Content"               mime-preview-play-current-entity)
-    (extract	 "Extract Content"            mime-view-extract-current-entity)
-    (print	 "Print"                      mime-view-print-current-entity)
-    (x-face	 "Show X Face"                mime-view-display-x-face)
+  '((up		 "Move to upper entity"    mime-preview-move-to-upper)
+    (previous	 "Move to previous entity" mime-preview-move-to-previous)
+    (next	 "Move to next entity"	   mime-preview-move-to-next)
+    (scroll-down "Scroll-down"             mime-preview-scroll-down-entity)
+    (scroll-up	 "Scroll-up"               mime-preview-scroll-up-entity)
+    (play	 "Play current entity"     mime-preview-play-current-entity)
+    (extract	 "Extract current entity"  mime-preview-extract-current-entity)
+    (print	 "Print current entity"    mime-view-print-current-entity)
+    (x-face	 "Show X Face"             mime-view-display-x-face)
     )
   "Menu for MIME Viewer")