emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Disable smartparens rules for org-mode

Browse source 
They're more troublesome than helpful, but we still want brace
autopairing, so leave smartparens-mode on.
This commit is contained in:
Henrik Lissner 2020-04-05 19:03:10 -04:00
parent 2ceac53421
commit f8090fd09b
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 1 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

29
modules/lang/org/config.el
View file

@ -715,32 +715,6 @@ compelling reason, so..."
)
(defun +org-init-smartparens-h ()
"TODO"
(after! smartparens
(defun +org-sp-point-in-checkbox-p (_id action _context)
(and (eq action 'insert)
(sp--looking-at-p "\\s-*]")))
(defun +org-sp-point-at-bol-p (_id action _context)
(and (eq action 'insert)
(save-excursion
(skip-chars-backward "*")
(bolp))))
(defun +org-sp-in-src-block-p (_id action _context)
(and (eq action 'insert)
(org-in-src-block-p)))
;; make delimiter auto-closing a little more conservative
(sp-with-modes 'org-mode
(sp-local-pair "*" "*" :unless '(:add sp-point-before-word-p sp-in-math-p +org-sp-point-at-bol-p +org-sp-in-src-block-p))
(sp-local-pair "_" "_" :unless '(:add sp-point-before-word-p sp-in-math-p +org-sp-in-src-block-p))
(sp-local-pair "/" "/" :unless '(:add sp-point-before-word-p sp-in-math-p +org-sp-point-in-checkbox-p +org-sp-in-src-block-p))
(sp-local-pair "~" "~" :unless '(:add sp-point-before-word-p +org-sp-in-src-block-p))
(sp-local-pair "=" "=" :unless '(:add sp-point-before-word-p sp-in-math-p +org-sp-in-src-block-p)))))
;;
;;; Packages
@ -939,8 +913,7 @@ compelling reason, so..."
#'+org-init-keybinds-h
#'+org-init-popup-rules-h
#'+org-init-protocol-h
#'+org-init-protocol-lazy-loader-h
#'+org-init-smartparens-h)
#'+org-init-protocol-lazy-loader-h)
;;; Custom org modules
(if (featurep! +brain) (load! "contrib/brain"))