diff options
| author | Kjetil Orbekk <kj@orbekk.com> | 2023-12-17 13:33:21 -0500 |
|---|---|---|
| committer | Kjetil Orbekk <kj@orbekk.com> | 2023-12-17 13:33:45 -0500 |
| commit | b32fcd48242a39318b0410e4f6db4744d27531e8 (patch) | |
| tree | 144d66cd496d7f063fd1b7b65b928522501d0e3e /emacs/.config/emacs-kj/lisp/kj-defaults.el | |
| parent | 7b2f59667a46891155e2cbf91692f66ef44ff946 (diff) | |
updates
add eshell-here binding
add open-line customization
Diffstat (limited to 'emacs/.config/emacs-kj/lisp/kj-defaults.el')
| -rw-r--r-- | emacs/.config/emacs-kj/lisp/kj-defaults.el | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/emacs/.config/emacs-kj/lisp/kj-defaults.el b/emacs/.config/emacs-kj/lisp/kj-defaults.el index f4fd4ce..a5ced96 100644 --- a/emacs/.config/emacs-kj/lisp/kj-defaults.el +++ b/emacs/.config/emacs-kj/lisp/kj-defaults.el @@ -32,4 +32,18 @@ (setq kill-whole-line t) +(defun kj/kill-word-or-region (arg) + (interactive "p") + (if (region-active-p) + (kill-region (region-beginning) (region-end)) + (backward-kill-word (or arg 1)))) +(global-set-key (kbd "C-w") 'kj/kill-word-or-region) + +(defun kj/open-line (n) + (interactive "*p") + (beginning-of-line) + (open-line n) + (indent-according-to-mode)) +(global-set-key (kbd "C-o") 'kj/open-line) + (provide 'kj-defaults) |