From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Sat, 9 Oct 2010 15:44:44 +0000 (+0200)
Subject: (ibuffer-mode-map): Don't redefine the cursor keys, since that's too annoying.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~46^2~101
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77aec22102cdee599831f5ae3e5eee7e3f2e3a5a;p=emacs.git

(ibuffer-mode-map): Don't redefine the cursor keys, since that's too annoying.

Move the filter groups commands to TAB/backtab.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3679a448430..bbe3d70242d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2010-10-09  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+	* ibuffer.el (ibuffer-mode-map): Don't redefine the cursor keys,
+	since that's too annoying.  Move the filter groups commands to
+	TAB/backtab.
+
 	* epa.el (epa-passphrase-callback-function): Say what we're
 	querying the password for.
 
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 4ba52cd2feb..052d43b41b6 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -433,10 +433,8 @@ directory, like `default-directory'."
 
     ;; immediate operations
     (define-key map (kbd "n") 'ibuffer-forward-line)
-    (define-key map (kbd "<down>") 'ibuffer-forward-line)
     (define-key map (kbd "SPC") 'forward-line)
     (define-key map (kbd "p") 'ibuffer-backward-line)
-    (define-key map (kbd "<up>") 'ibuffer-backward-line)
     (define-key map (kbd "M-}") 'ibuffer-forward-next-marked)
     (define-key map (kbd "M-{") 'ibuffer-backwards-next-marked)
     (define-key map (kbd "l") 'ibuffer-redisplay)
@@ -477,9 +475,9 @@ directory, like `default-directory'."
     (define-key map (kbd "/ /") 'ibuffer-filter-disable)
 
     (define-key map (kbd "M-n") 'ibuffer-forward-filter-group)
-    (define-key map (kbd "<right>") 'ibuffer-forward-filter-group)
+    (define-key map "\t" 'ibuffer-forward-filter-group)
     (define-key map (kbd "M-p") 'ibuffer-backward-filter-group)
-    (define-key map (kbd "<left>") 'ibuffer-backward-filter-group)
+    (define-key map [backtab] 'ibuffer-backward-filter-group)
     (define-key map (kbd "M-j") 'ibuffer-jump-to-filter-group)
     (define-key map (kbd "C-k") 'ibuffer-kill-line)
     (define-key map (kbd "C-y") 'ibuffer-yank)