Org: Subtley improve writeroom styling

Less content indentation, and some variables that should be reset that
were forgotten about.
This commit is contained in:
TEC 2021-03-05 04:54:15 +08:00
parent fc346b6905
commit a068f2cfff
Signed by: tec
GPG key ID: 779591AFDB81F06C

View file

@ -2056,6 +2056,7 @@ tweaks. Namely:
+ Hiding headline leading stars + Hiding headline leading stars
+ Using fleurons as headline bullets + Using fleurons as headline bullets
+ Hiding line numbers + Hiding line numbers
+ Removing outline indentation
+ Centring the text + Centring the text
+ Turning on ~org-pretty-table-mode~ + Turning on ~org-pretty-table-mode~
@ -2080,13 +2081,17 @@ tweaks. Namely:
(when +zen--original-solaire-mode-p (solaire-mode 1))))) (when +zen--original-solaire-mode-p (solaire-mode 1)))))
(pushnew! writeroom--local-variables (pushnew! writeroom--local-variables
'display-line-numbers 'display-line-numbers
'visual-fill-column-width) 'visual-fill-column-width
'org-adapt-indentation
'org-superstar-headline-bullets-list
'org-superstar-remove-leading-stars)
(add-hook 'writeroom-mode-enable-hook (add-hook 'writeroom-mode-enable-hook
(defun +zen-prose-org-h () (defun +zen-prose-org-h ()
"Reformat the current Org buffer appearance for prose." "Reformat the current Org buffer appearance for prose."
(when (and (eq major-mode 'org-mode) writeroom-mode) (when (eq major-mode 'org-mode)
(setq display-line-numbers nil (setq display-line-numbers nil
visual-fill-column-width 60) visual-fill-column-width 60
org-adapt-indentation nil)
(when (featurep 'org-superstar) (when (featurep 'org-superstar)
(setq-local org-superstar-headline-bullets-list '("🙘" "🙙" "🙚" "🙛") (setq-local org-superstar-headline-bullets-list '("🙘" "🙙" "🙚" "🙛")
;; org-superstar-headline-bullets-list '("🙐" "🙑" "🙒" "🙓" "🙔" "🙕" "🙖" "🙗") ;; org-superstar-headline-bullets-list '("🙐" "🙑" "🙒" "🙓" "🙔" "🙕" "🙖" "🙗")