From 717f37cb5736ce4f8fb546527aa0b5a538bf88b1 Mon Sep 17 00:00:00 2001 From: morioka Date: Fri, 13 Mar 1998 15:32:50 +0000 Subject: [PATCH] (mime-view-menu-list): Modify menu. --- mime-view.el | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) 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") -- 1.7.10.4