X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fkeydefs.el;h=17f2e6672b62d5e62338d333a5a52d44489c4e00;hb=d8bd7eee3147c839d3c74d1823c139cd54867a75;hp=765ee587a1af88b52876f177bf00be661f9fd3ea;hpb=e5cd8d4ed475af329be5df9627a53edd584fd3de;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/keydefs.el b/lisp/keydefs.el
index 765ee58..17f2e66 100644
--- a/lisp/keydefs.el
+++ b/lisp/keydefs.el
@@ -272,6 +272,10 @@ Keymap for characters following C-c.")
 (define-key global-map "\M-\C-t" 'transpose-sexps)
 (define-key global-map "\C-x\C-t" 'transpose-lines)
 
+;; XEmacs: much more reasonable and useful key definitions.
+(define-key global-map '(control T) 'transpose-line-down)
+(define-key global-map '(meta T) 'transpose-line-up)
+
 (define-key global-map "\M-;" 'indent-for-comment)
 (define-key global-map "\M-j" 'indent-new-comment-line)
 (define-key global-map "\M-\C-j" 'indent-new-comment-line)