From 01d972a90bb7883354b84a0a2240f05fa2999c5c Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Mon, 5 Mar 2012 18:44:31 +0800 Subject: [PATCH] * lisp/eshell/em-cmpl.el (eshell-cmpl-initialize): Fix shift-tab key. --- lisp/ChangeLog | 4 ++++ lisp/eshell/em-cmpl.el | 3 +-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 92d12fbc1ff..a6e04ca25db 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-03-05 Leo Liu + + * eshell/em-cmpl.el (eshell-cmpl-initialize): Fix shift-tab key. + 2012-03-05 Chong Yidong * simple.el (count-words): If called from Lisp, return the word diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el index f997d47f665..a5e1b6194c7 100644 --- a/lisp/eshell/em-cmpl.el +++ b/lisp/eshell/em-cmpl.el @@ -299,8 +299,7 @@ to writing a completion function." ;; jww (1999-10-19): Will this work on anything but X? (if (featurep 'xemacs) (define-key eshell-mode-map [iso-left-tab] 'pcomplete-reverse) - (define-key eshell-mode-map [(shift iso-lefttab)] 'pcomplete-reverse) - (define-key eshell-mode-map [(shift control ?i)] 'pcomplete-reverse)) + (define-key eshell-mode-map [backtab] 'pcomplete-reverse)) (define-key eshell-mode-map [(meta ??)] 'pcomplete-list)) (defun eshell-completion-command-name () -- 2.39.2