acdw/emacs
acdw
/
emacs
1
2
Fork 0
Code Issues 4 Pull Requests Releases Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
init.el
View File

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