diff options
Diffstat (limited to 'ravi-init-appearance.el')
| -rw-r--r-- | ravi-init-appearance.el | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/ravi-init-appearance.el b/ravi-init-appearance.el index f52164a..75a8305 100644 --- a/ravi-init-appearance.el +++ b/ravi-init-appearance.el @@ -87,6 +87,25 @@ ;; Kill the entire line, please (setq kill-whole-line t) +;; Delete hungrily +(use-package hungry-delete + :commands (hungry-delete-forward hungry-delete-backward) + :bind (("C-d" . hungry-delete-forward)) + :init + (progn + (defun jschaf/hungry-delete-backward (n &optional killflag) + "Delete non-vertical whitespace backwards on first key press. +Delete all whitespace on a successive key press." + (interactive "p\nP") + (if (eq last-command 'jschaf/hungry-delete-backward) + (hungry-delete-backward n killflag) + (let ((hungry-delete-chars-to-skip " \t\f\v")) + (hungry-delete-backward n killflag)))) + ;;(define-key global-map [remap backward-delete-char-untabify] 'jschaf/hungry-delete-backward) + (define-key global-map [remap backward-delete-char-untabify] 'hungry-delete-backward) + ) + :ensure t) + ;; Easily navigate sillycased words ;(global-subword-mode 1) |