about summary refs log tree commit diff stats
path: root/.emacs.d
diff options
context:
space:
mode:
authorDavid Morgan <djm_uk@protonmail.com>2022-05-31 09:31:07 +0100
committerDavid Morgan <djm_uk@protonmail.com>2022-05-31 09:31:07 +0100
commitbcff3e390f395ab7b03987af22cbe2d11eb3f1c5 (patch)
treeb53681815d5692ebf16e5f7bb530b35700eb0f13 /.emacs.d
parent3d73d14b22808e0b2ebc4322d29de473f7225193 (diff)
downloaddotfiles-bcff3e390f395ab7b03987af22cbe2d11eb3f1c5.tar.gz
Add paredit-kill-region binding
Diffstat (limited to '.emacs.d')
-rw-r--r--.emacs.d/lisp/init-paredit.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/.emacs.d/lisp/init-paredit.el b/.emacs.d/lisp/init-paredit.el
index 0b8c7ce..252932d 100644
--- a/.emacs.d/lisp/init-paredit.el
+++ b/.emacs.d/lisp/init-paredit.el
@@ -26,7 +26,8 @@
         ([remap paredit-wrap-round] . paredit-smart-wrap-round)
         ([remap paredit-meta-doublequote] . paredit-smart-metadouble-quote)
         ([remap paredit-splice-sexp] . paredit-smart-splice-sexp)
-        ("M-W" . paredit-copy-as-kill))
+        ("M-W" . paredit-copy-as-kill)
+        ("C-S-k" . paredit-kill-region))
   :config
   (defmacro define-paredit-smart-wrap (name)
     `(defun ,(intern (concat  "paredit-smart-wrap-" name))
@@ -66,7 +67,8 @@ Falls back to smartparens in comments."
     `(defun ,(intern (concat  "paredit-smart-" name "-sexp"))
          (&optional argument)
        ,(concat "Splice the list that the point is on by removing its delimiters.
-This version falls back to the smartparens version in scenarios that paredit will not handle.")
+This version falls back to the smartparens version in scenarios that paredit will
+not handle.")
        (interactive "P")
        (if (or (paredit-in-string-p)
                (paredit-in-comment-p)