Add a keybinding for backward line killing

2013-04-08 18:50:05 +03:00 · 2013-04-08 18:50:05 +03:00 · 1bf7a3f8a8
commit 1bf7a3f8a8
parent 00b16e5ce7
1 changed files with 5 additions and 0 deletions
--- a/core/prelude-global-keybindings.el
+++ b/core/prelude-global-keybindings.el
@ -74,6 +74,11 @@
 (autoload 'zap-up-to-char "misc" "Kill up to, but not including ARGth occurrence of CHAR.")
 (global-set-key (kbd "M-Z") 'zap-up-to-char)

+;; kill lines backward
+(global-set-key (kbd "C-<backspace>") (lambda ()
+                                        (interactive)
+                                        (kill-line 0)))
+
 ;; Activate occur easily inside isearch
 (define-key isearch-mode-map (kbd "C-o")
  (lambda () (interactive)