Sync up with r21-4-12-chise-0_21-o-=iso-ir165.

[chise/xemacs-chise.git-] / lisp / keydefs.el

diff --git a/lisp/keydefs.el b/lisp/keydefs.el
index 765ee58..17f2e66 100644 (file)
--- 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)