(vc-dir-mode-map): Fix M-down and M-up binding.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4aebc471f0b4018e9f87a1b215fbd42a4b2c2103..3b87fa0e02b1afb664e6f8cb4cddcb3041371419 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-05-17  Andreas Schwab  <schwab@suse.de>
+
+       * vc-dispatcher.el (vc-dir-mode-map): Fix M-down and M-up binding.
+
 2008-05-17  Dan Nicolaescu  <dann@ics.uci.edu>
 
        * vc.el (vc-annotate-show-diff-revision-at-line): Change

diff --git a/lisp/vc-dispatcher.el b/lisp/vc-dispatcher.el
index b257025d5019b2a2a603f960e45049704bc54d9f..1145ee260c96d323aa2c19c9b2dfb983ee7b2bee 100644 (file)
--- a/lisp/vc-dispatcher.el
+++ b/lisp/vc-dispatcher.el
@@ -783,8 +783,8 @@ See `run-hooks'."
     ;;; Rebind paragraph-movement commands.
     (define-key map "\M-}" 'vc-dir-next-directory)
     (define-key map "\M-{" 'vc-dir-prev-directory)
-    (define-key map "\M-<down>" 'vc-dir-next-directory)
-    (define-key map "\M-<up>" 'vc-dir-prev-directory)
+    (define-key map [M-down] 'vc-dir-next-directory)
+    (define-key map [M-up] 'vc-dir-prev-directory)
     ;; The remainder.
     (define-key map "f" 'vc-dir-find-file)
     (define-key map "\C-m" 'vc-dir-find-file)