From 305b766438bc63e014457d8c818885c6ea09b993 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Wed, 6 Dec 2023 16:11:40 +0200 Subject: emacs:(org) Add thanos/org-hook Use #'thanos/org-hook as hook for org-mode - Customize org scaling depending on enabled theme --- .emacs.d/modules/thanos-org.el | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) (limited to '.emacs.d/modules/thanos-org.el') diff --git a/.emacs.d/modules/thanos-org.el b/.emacs.d/modules/thanos-org.el index f0d2686..3e7d9b7 100644 --- a/.emacs.d/modules/thanos-org.el +++ b/.emacs.d/modules/thanos-org.el @@ -188,11 +188,15 @@ :height 1.0 :foreground "#fb4934")) -(add-hook 'org-mode-hook #'(lambda () - (display-line-numbers-mode -1) - ;; (thanos/org-scale) - (flyspell-mode) - (org-auto-tangle-mode))) +(defun thanos/org-hook () + "Add hooks for `org-mode'." + (display-line-numbers-mode -1) + (flyspell-mode) + (org-auto-tangle-mode) + (when (not (equal (car custom-enabled-themes) 'modus-vivendi)) + (thanos/org-scale))) + +(add-hook 'org-mode-hook #'thanos/org-hook) (modify-all-frames-parameters '((right-divider-width . 5) @@ -237,4 +241,4 @@ (setf org-download-screenshot-method "scrot --select %s") (provide 'thanos-org) -;;; thanos-org-config.el ends here +;;; thanos-org.el ends here -- cgit v1.2.3