changeset 51260:a51376ab4a2e

(global-map): Bind M-S-<backspace to kill-whole-line.
author Kai Großjohann <kgrossjo@eu.uu.net>
date Tue, 27 May 2003 13:57:22 +0000
parents 8b32f7df287b
children a3a1d78e827e
files lisp/ChangeLog lisp/bindings.el
diffstat 2 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon May 26 23:03:17 2003 +0000
+++ b/lisp/ChangeLog	Tue May 27 13:57:22 2003 +0000
@@ -1,3 +1,8 @@
+2003-05-27  Kai Gro,A_(Bjohann  <kai.grossjohann@gmx.net>
+
+	* bindings.el (global-map): Bind M-S-<backspace to
+	kill-whole-line.
+
 2003-05-26  John Paul Wallington  <jpw@gnu.org>
 
 	* faces.el (display-supports-face-attributes-p): Doc fix.
--- a/lisp/bindings.el	Mon May 26 23:03:17 2003 +0000
+++ b/lisp/bindings.el	Tue May 27 13:57:22 2003 +0000
@@ -743,6 +743,7 @@
 ;(define-key global-map [delete] 'backward-delete-char)
 
 ;; natural bindings for terminal keycaps --- defined in X keysym order
+(define-key global-map [M-S-backspace]  'kill-whole-line)
 (define-key global-map [home]		'beginning-of-line)
 (define-key global-map [C-home]		'beginning-of-buffer)
 (define-key global-map [M-home]		'beginning-of-buffer-other-window)