Emacs: Remove paredit spaces when cedit enabled

1 files changed, 4 insertions, 0 deletions

diff --git a/tag-emacs/emacs.d/init.el b/tag-emacs/emacs.d/init.el
index 0e8f1e3..4f80ec4 100644
--- a/tag-emacs/emacs.d/init.el
+++ b/tag-emacs/emacs.d/init.el
@@ -1048,6 +1048,10 @@ mouse-1: Display Line and Column Mode Menu"))))))
           (add-hook 'lisp-mode-common-hook #'enable-paredit-mode)
           (put #'paredit-forward-delete 'delete-selection 'supersede)
           (put #'paredit-backward-delete 'delete-selection 'supersede)
+          (defun ap/cedit-space-delimiter-p (endp delimiter)
+            "Don't insert a space before delimiters in c-style modes"
+            (not cedit-mode))
+          (add-to-list 'paredit-space-for-delimiter-predicates #'ap/cedit-space-delimiter-p)
           (add-hook 'minibuffer-setup-hook #'conditionally-enable-paredit-mode)
           (defun conditionally-enable-paredit-mode ()
             "enable paredit-mode during eval-expression"