mirror of
https://codeberg.org/scip/dot-emacs.git
synced 2025-12-17 04:20:57 +01:00
+fixes
This commit is contained in:
34
.emacs
34
.emacs
@@ -2176,16 +2176,38 @@ col1, col2"
|
|||||||
;; https://ebzzry.io/en/emacs-pairs/
|
;; https://ebzzry.io/en/emacs-pairs/
|
||||||
(require 'smartparens-config)
|
(require 'smartparens-config)
|
||||||
|
|
||||||
|
(defun tvd-disable-par-and-pair()
|
||||||
|
"Disables Paredit and Electric-Pair-Mode if currently active.
|
||||||
|
Used when enabling smartparens-mode."
|
||||||
|
(interactive)
|
||||||
|
(when electric-pair-mode
|
||||||
|
(electric-pair-mode))
|
||||||
|
(when paredit-mode
|
||||||
|
(disable-paredit-mode)))
|
||||||
|
|
||||||
(eval-after-load 'smartparens
|
(eval-after-load 'smartparens
|
||||||
'(progn
|
'(progn
|
||||||
(add-hook 'smartparens-enabled-hook #'disable-paredit-mode)
|
(add-hook 'smartparens-enabled-hook #'tvd-disable-par-and-pair)
|
||||||
(define-key smartparens-mode-map (kbd "C-k") 'sp-kill-sexp)
|
|
||||||
(define-key smartparens-mode-map (kbd "C-<left>") 'sp-forward-slurp-sexp)
|
;; modification
|
||||||
(define-key smartparens-mode-map (kbd "C-<right>") 'sp-forward-barf-sexp)
|
(define-key smartparens-mode-map (kbd "C-k") 'sp-kill-sexp)
|
||||||
|
(define-key smartparens-mode-map (kbd "C-<left>") 'sp-forward-slurp-sexp)
|
||||||
|
(define-key smartparens-mode-map (kbd "C-<right>") 'sp-forward-barf-sexp)
|
||||||
|
(define-key smartparens-mode-map (kbd "M-<delete>") 'sp-unwrap-sexp)
|
||||||
|
(define-key smartparens-mode-map (kbd "M-<backspace>") 'sp-backward-unwrap-sexp)
|
||||||
|
|
||||||
|
;; movement
|
||||||
|
;; Also Check: https://github.com/Fuco1/smartparens/wiki/Working-with-expressions
|
||||||
|
;; (look for "quick summary for each navigation function")
|
||||||
(define-key smartparens-mode-map (kbd "C-M-<right>") 'sp-forward-sexp)
|
(define-key smartparens-mode-map (kbd "C-M-<right>") 'sp-forward-sexp)
|
||||||
(define-key smartparens-mode-map (kbd "C-M-<left>") 'sp-backward-sexp)
|
(define-key smartparens-mode-map (kbd "C-M-<left>") 'sp-backward-sexp)
|
||||||
(define-key smartparens-mode-map (kbd "C-S-<right>") 'sp-next-sexp)
|
(define-key smartparens-mode-map (kbd "C-S-<left>") 'sp-next-sexp)
|
||||||
(define-key smartparens-mode-map (kbd "C-S-<left>") 'sp-previous-sexp)
|
(define-key smartparens-mode-map (kbd "C-S-<right>") 'sp-previous-sexp)
|
||||||
|
|
||||||
|
;; replace my global setting
|
||||||
|
;; FIXME: fhceck/fix M<up+down>!
|
||||||
|
(define-key smartparens-mode-map (kbd "M-<right>") 'sp-forward-symbol)
|
||||||
|
(define-key smartparens-mode-map (kbd "M-<left>") 'sp-backward-symbol)
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|||||||
1006
emacs.html
1006
emacs.html
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user