tre/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix sub bullets in org-format

Browse source
This commit is contained in:
mez 2025-05-03 18:34:36 +01:00
parent 602a431092
commit 124c96cfdd
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
custom/org-format.el
View file

@ -68,6 +68,9 @@
(while (re-search-forward "”/>" nil t) (while (re-search-forward "”/>" nil t)
(replace-match "\"/>")) (replace-match "\"/>"))
(goto-char (point-min)) (goto-char (point-min))
(while (re-search-forward "\n  –" nil t)
(replace-match "\n -"))
(goto-char (point-min))
(while (re-search-forward "=\"\\([^>]*\\)”" nil t) (while (re-search-forward "=\"\\([^>]*\\)”" nil t)
(replace-match "=\"\\1\""))) (replace-match "=\"\\1\"")))