ParEdit, 2

.

What is there before the beginning of the universe?

What does the universe change from?

— Me@2016-07-20 06:16:34 AM

.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(autoload 'enable-paredit-mode
  "paredit" "Turn on pseudo-structural editing." t)

;;;;;;;;;;;

(defun add-hooks (hooks fn)
  (mapc (lambda (hook)
      (add-hook hook fn))
    hooks))

(add-hooks (list
        'emacs-lisp-mode-hook
        'eval-expression-minibuffer-setup-hook
        'ielm-mode-hook
        'lisp-mode-hook
        'lisp-interaction-mode-hook
        'scheme-mode-hook)

       #'enable-paredit-mode)

;;;;;;;;;;;

(add-hook 'slime-repl-mode-hook
      (lambda () (paredit-mode +1)))

(defun override-slime-repl-bindings-with-paredit ()
   (define-key slime-repl-mode-map
     (read-kbd-macro paredit-backward-delete-key) nil))

(add-hook 'slime-repl-mode-hook
      'override-slime-repl-bindings-with-paredit)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

— Me@2022-12-09 01:24:55 PM

.

.

2022.12.09 Friday (c) All rights reserved by ACHK