org-format tweaks

master
trémeur 1 year ago
parent 6a305b0147
commit 6df4cbb678

@ -53,6 +53,12 @@
(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 "/ …" nil t)
(replace-match " …/"))
(goto-char (point-min))
(while (re-search-forward "“ –" nil t)
(replace-match "“–"))
(goto-char (point-min))
(while (re-search-forward "=”" nil t) (while (re-search-forward "=”" nil t)
(replace-match "=\"")) (replace-match "=\""))
(goto-char (point-min)) (goto-char (point-min))

Loading…
Cancel
Save