1 files changed, 7 insertions, 6 deletions

@@ -1654,16 +1654,17 @@ successive invocations."
   ;; I don't use paredit-splice-sexp much, and it stomps on isearch.
   (:unbind "M-s")
   
-  (defun setup-paredit-mode ()
+  (defun paredit@setup ()
     "Correct weirdnesses and set up paredit mode."
-    (paredit-mode +1)
-    (let ((map lisp-mode-shared-map))
-      (define-key map (kbd "DEL") #'paredit-backward-delete)
-      (define-key map (kbd "C-M-;") #'comment-or-uncomment-sexp)))
+    (:with-map lisp-mode-shared-map
+      (:bind "DEL" paredit-backward-delete
+             "C-M-;" comment-or-uncomment-sexp
+             "C-<backspace>" paredit-backward-kill-word))
+    (paredit-mode +1))
   
   (dolist (mode lispy-modes)
     (add-hook (intern (concat (symbol-name mode) "-hook"))
-              #'setup-paredit-mode))
+              #'paredit@setup))
   
   (require 'eldoc)
   (eldoc-add-command 'paredit-backward-delete 'paredit-close-round))