 (def ^:const special-chars
   #{"(" ")" "[" "]" "{" "}" "\""})
 
+(def ^:const ignore-during-selection
+  #{:paredit-backward-delete
+    :paredit-forward-delete})
+
 (defn exec-paredit!
   [k w buffer enable-default? enable-advanced?]
   (when-let [cmd (or (and enable-default?

   ["M" "Right"] :paredit-expand-right})

(def ^:const advanced-alternative-keymap
  {["C" "Open Bracket"] :paredit-backward-barf-sexp
   ["C" "Close Bracket"] :paredit-forward-barf-sexp
   ["M" "←"] :paredit-expand-left
   ["M" "→"] :paredit-expand-right})

   [nil "]"] :paredit-close-square
   [nil "{"] :paredit-open-curly
   [nil "}"] :paredit-close-curly
   [nil "Backspace"] :paredit-backward-delete
   [nil "Delete"] :paredit-forward-delete
   [nil "\""] :paredit-doublequote
   ["C" "9"] :paredit-backward-slurp-sexp
   ["C" "0"] :paredit-forward-slurp-sexp
