From 0c5ce2b825b15c7f77ff09f6ed48a7762b298142 Mon Sep 17 00:00:00 2001
From: David Morgan <djm_uk@protonmail.com>
Date: Wed, 22 Sep 2021 16:35:11 +0100
Subject: Tweak paredit changes

---
 .emacs.d/lisp/init-paredit.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/.emacs.d/lisp/init-paredit.el b/.emacs.d/lisp/init-paredit.el
index bfcb121..2c873f1 100644
--- a/.emacs.d/lisp/init-paredit.el
+++ b/.emacs.d/lisp/init-paredit.el
@@ -19,6 +19,7 @@
   :diminish
   :bind
   (:map paredit-mode-map
+        ([remap mark-sexp] . sp-mark-sexp)
         ("M-[" . paredit-smart-wrap-square)
         ("C-c M-{" . paredit-smart-wrap-curly)
         ("C-c M-<" . paredit-smart-wrap-angled)
@@ -27,7 +28,7 @@
         ("M-W" . paredit-copy-as-kill))
   :config
   (defmacro define-paredit-smart-wrap (name)
-    `(defun ,(paredit-conc-name "paredit-smart-wrap-" name)
+    `(defun ,(intern (concat  "paredit-smart-wrap-" name))
          (&optional argument)
        ,(concat "Wrap the following S-expression, from the beginning of the current symbol.
 See `paredit-wrap-sexp' for more details.
-- 
cgit 1.4.1-2-gfad0