Configure org-mode ... some more

This commit is contained in:
Case Duckworth 2022-04-13 10:15:59 -05:00
parent e3e399ac52
commit 3c5c175b84
1 changed files with 8 additions and 5 deletions

13
init.el
View File

@ -573,8 +573,7 @@
org-indent-indentation-per-level 0
org-indent-mode-turns-on-hiding-stars nil
org-list-demote-modify-bullet '(("-" . "+")
("+" . "*")
("*" . "-"))
("+" . "-"))
org-log-done 'time
org-log-into-drawer t
org-num-skip-commented t
@ -641,11 +640,14 @@
;; complains about "Invalid face reference: t" in org-mode buffers, because
;; `compose-region' returns t.
("^[ \t]*\\([-]\\) "
(0 (progn (compose-region (match-beginning 1) (match-end 1) "") 'fixed-pitch)))
(0 ;; (progn (compose-region (match-beginning 1) (match-end 1) "") 'fixed-pitch)
'fixed-pitch t))
("^[ \t]*\\([+]\\) "
(0 (progn (compose-region (match-beginning 1) (match-end 1) "¬") 'fixed-pitch)))
(0 ;; (progn (compose-region (match-beginning 1) (match-end 1) "¬") 'fixed-pitch)
'fixed-pitch t))
("^[ \t]+\\([*]\\) "
(0 (progn (compose-region (match-beginning 1) (match-end 1) "") 'fixed-pitch)))
(0 ;; (progn (compose-region (match-beginning 1) (match-end 1) "→") 'fixed-pitch)
'fixed-pitch t))
;; Fancy numbered lists (well, monospaced)
("^[ \t]*\\(\\(?:[0-9]+\\|[A-Za-z]\\)[.)]\\) " 0 'fixed-pitch t)))
;; Make nobreak-space fixed-pitch as well, for better alignment (is this the
@ -745,6 +747,7 @@
(:also-load ox-md)
(:option org-export-coding-system 'utf-8-unix
org-export-headline-levels 8
org-export-with-drawers nil
org-export-with-section-numbers nil
org-export-with-smart-quotes t
org-export-with-sub-superscripts t