From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 4 Jun 2008 05:58:33 +0000 (+0000)
Subject: (image-mode-map): Add doc-view-inspired bindings.
X-Git-Tag: emacs-pretest-23.0.90~5121
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=42c27c2a24f74e02dc040f278fa73ccddf811015;p=emacs.git

(image-mode-map): Add doc-view-inspired bindings.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9cd7a630cf4..67b3ec53497 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-06-04  Markus Triska  <markus.triska@gmx.at>
+
+	* image-mode.el (image-mode-map): Add doc-view-inspired bindings.
+
 2008-06-04  Miles Bader  <miles@gnu.org>
 
 	* face-remap.el (adjust-buffer-face-height): New function.
diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index efab43aaf4f..b94a3ee4dad 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -290,6 +290,9 @@ This variable is used to display the current image type in the mode line.")
     (define-key map "q"         'quit-window)
     ;;
     (define-key map "\C-c\C-c" 'image-toggle-display)
+    (define-key map (kbd "SPC")       'image-scroll-up)
+    (define-key map (kbd "DEL")       'image-scroll-down)
+    ;;
     (define-key map [remap forward-char] 'image-forward-hscroll)
     (define-key map [remap backward-char] 'image-backward-hscroll)
     (define-key map [remap previous-line] 'image-previous-line)