From ea1f015a41523bb6b1e6163341d935285813913a Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Wed, 13 Jan 2021 19:53:11 -0600 Subject: Align org tags on changes This probably isn’t necessary with my particular setup… --- config.org | 27 ++++++++++++++++++++++++--- 1 file changed, 24 insertions(+), 3 deletions(-) diff --git a/config.org b/config.org index 0bc7454..d2eca4c 100644 --- a/config.org +++ b/config.org @@ -1577,14 +1577,35 @@ from [[https://github.com/Fuco1/.emacs.d/blob/a8230343bb7e2f07f5eac8e63e5506fa16 (variable-pitch)))))) #+end_src +***** Align all tags in the buffer on changes + +from [[https://github.com/mpereira/.emacs.d#align-all-tags-in-the-buffer-on-tag-changes][mpereira]]. + +#+begin_src emacs-lisp + (defun acdw/org-align-all-tags () + "Align all org tags in the buffer." + (interactive) + (when (eq major-mode 'org-mode) + (org-align-tags t))) + + (add-hook 'org-after-tags-change-hook #'acdw/org-align-all-tags) +#+end_src + +**** Source blocks + + #+begin_src emacs-lisp + (set-face-attribute 'org-block-begin-line nil + :height 0.85) + #+end_src + **** Prettify #+begin_src emacs-lisp (defun acdw/org-mode-prettify () "Prettify `org-mode'." - (dolist (cell '(("[ ]" . ?□) ("[X]" . ?☑) ("[-]" . ?◐) - ("#+begin_src" . ?✎) ("#+begin_src" . ?✎) - ("#+end_src" . ?■) ("#+end_src" . ?■))) + (dolist (cell '(("[ ]" . ?☐) ("[X]" . ?☑) ("[-]" . ?◐) + ("#+BEGIN_SRC" . ?✎) ("#+begin_src" . ?✎) + ("#+END_SRC" . ?■) ("#+end_src" . ?■))) (add-to-list 'prettify-symbols-alist cell :append)) (prettify-symbols-mode +1)) -- cgit 1.4.1-21-gabe81