From: Andreas Schwab <schwab@suse.de>
Date: Sat, 17 May 2008 20:00:41 +0000 (+0000)
Subject: (vc-dir-mode-map): Fix M-down and M-up binding.
X-Git-Tag: emacs-pretest-23.0.90~5467
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=53b2b69f6f0f465cc2a7f13d2a5f8075fd5ad1c4;p=emacs.git

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4aebc471f0b..3b87fa0e02b 100644
--- 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 b257025d501..1145ee260c9 100644
--- 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)