diff --git a/global.org b/global.org index e68d56d..07d9f92 100644 --- a/global.org +++ b/global.org @@ -988,14 +988,17 @@ *** Paredit #+BEGIN_SRC emacs-lisp (autoload 'enable-paredit-mode "paredit" "Turn on - pseudo-structural editing of Lisp code." t) + pseudo-structural editing of Lisp code." t) (add-hook 'emacs-lisp-mode-hook #'enable-paredit-mode) (with-eval-after-load "paredit" - (define-key-alist paredit-mode-map - '(("C-H-l" . paredit-forward-slurp-sexp) - ("C-H-M-j" . paredit-backward-slurp-sexp) - ("C-H-j" . paredit-forward-barf-sexp) - ("C-H-M-l" . paredit-backward-barf-sexp)))) + (define-paredit-pair ?“ ?” "pretty-quotes") + (require 'hydra) + (defhydra hydra-paren (global-map "C-SPC") + "paren slurp and barf" + ("C-f" paredit-forward-slurp-sexp "slurp forward") + ("M-f" paredit-forward-barf-sexp "barf forward") + ("C-b" paredit-backward-slurp-sexp "slurp backward") + ("M-b" paredit-backward-barf-sexp "barf backward"))) #+END_SRC *** Replace last sexp I use this a lot to evaluate (e.g.) quick computations in files