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

Org-format and agenda improvements

Browse source
This commit is contained in:
trémeur 2022-12-12 19:12:15 +00:00
parent 703101c4bd
commit 37897c4872
5 changed files with 130 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

12
custom/org-format.el
View file

@ -4,9 +4,21 @@
(while (re-search-forward " -" nil t)
(replace-match " –"))
(goto-char (region-beginning))
(while (re-search-forward " –" nil t)
(replace-match " –"))
(goto-char (region-beginning))
(while (re-search-forward " \\.\\.\\." nil t)
(replace-match " …"))
(goto-char (region-beginning))
(while (re-search-forward " …" nil t)
(replace-match " …"))
(goto-char (region-beginning))
(while (re-search-forward "'" nil t)
(replace-match "’"))
(goto-char (region-beginning))
(while (re-search-forward " \n" nil t)
(replace-match "\n"))
(goto-char (region-beginning))
(while (re-search-forward "\n\"" nil t)
(replace-match "\n“"))
(goto-char (region-beginning))