diff lisp/tm/tm-view.el @ 16:0293115a14e9 r19-15b91

Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents 4b173ad71786
children 8fc7fe29b841
line wrap: on
line diff
--- a/lisp/tm/tm-view.el	Mon Aug 13 08:48:43 2007 +0200
+++ b/lisp/tm/tm-view.el	Mon Aug 13 08:49:20 2007 +0200
@@ -1,10 +1,10 @@
 ;;; tm-view.el --- interactive MIME viewer for GNU Emacs
 
-;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
+;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1994/7/13 (1994/8/31 obsolete tm-body.el)
-;; Version: $Revision: 1.2 $
+;; Version: $Revision: 1.3 $
 ;; Keywords: mail, news, MIME, multimedia
 
 ;; This file is part of tm (Tools for MIME).
@@ -42,7 +42,7 @@
 ;;;
 
 (defconst mime-viewer/RCS-ID
-  "$Id: tm-view.el,v 1.2 1996/12/22 00:29:43 steve Exp $")
+  "$Id: tm-view.el,v 1.3 1997/02/02 05:06:20 steve Exp $")
 
 (defconst mime-viewer/version (get-version-string mime-viewer/RCS-ID))
 (defconst mime/viewer-version mime-viewer/version)
@@ -741,6 +741,10 @@
     (define-key mime/viewer-mode-map
       "n"        (function mime-viewer/next-content))
     (define-key mime/viewer-mode-map
+      "\e\t"     (function mime-viewer/previous-content))
+    (define-key mime/viewer-mode-map
+      "\t"       (function mime-viewer/next-content))
+    (define-key mime/viewer-mode-map
       " "        (function mime-viewer/scroll-up-content))
     (define-key mime/viewer-mode-map
       "\M- "     (function mime-viewer/scroll-down-content))
@@ -753,7 +757,7 @@
     (define-key mime/viewer-mode-map
       "v"        (function mime-viewer/play-content))
     (define-key mime/viewer-mode-map
-      "e"	   (function mime-viewer/extract-content))
+      "e"        (function mime-viewer/extract-content))
     (define-key mime/viewer-mode-map
       "\C-c\C-p" (function mime-viewer/print-content))
     (define-key mime/viewer-mode-map
@@ -808,11 +812,10 @@
 ---		-------
 
 u		Move to upper content
-p		Move to previous content
-n		Move to next content
+p or M-TAB	Move to previous content
+n or TAB	Move to next content
 SPC		Scroll up or move to next content
-M-SPC		Scroll down or move to previous content
-DEL		Scroll down or move to previous content
+M-SPC or DEL	Scroll down or move to previous content
 RET		Move to next line
 M-RET		Move to previous line
 v		Decode current content as `play mode'