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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9cd7a630cf40d697222698394dcc60f2b11d23c2..67b3ec53497328cfbac5c83d24b638acdd6bc60f 100644 (file)
--- 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 efab43aaf4f4eb7fef273ed2234893dfa72f6b79..b94a3ee4dadc808258427b53c3d23413b665830c 100644 (file)
--- 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)