Jousimies/.emacs.d

org-emphasis

Closed this issue · 1 comments

(defface my-org-emphasis-bold
  '((default :inherit bold)
    (((class color) (min-colors 88) (background light))
     :foreground "#a60000")
    (((class color) (min-colors 88) (background dark))
     :foreground "#ff8059"))
  "My bold emphasis for Org."
  :group 'org-faces)
(defface my-org-emphasis-italic
  '((default :inherit italic)
    (((class color) (min-colors 88) (background light))
     :foreground "#005e00")
    (((class color) (min-colors 88) (background dark))
     :foreground "#44bc44"))
  "My italic emphasis for Org."
  :group 'org-faces)
(defface my-org-emphasis-underline
  '((default :inherit underline)
    (((class color) (min-colors 88) (background light))
     :foreground "#813e00")
    (((class color) (min-colors 88) (background dark))
     :foreground "#d0bc00"))
  "My underline emphasis for Org."
  :group 'org-faces)
(defface my-org-emphasis-strike-through
  '((((class color) (min-colors 88) (background light))
     :strike-through "#972500" :foreground "#505050")
    (((class color) (min-colors 88) (background dark))
     :strike-through "#ef8b50" :foreground "#a8a8a8"))
  "My strike-through emphasis for Org."
  :group 'org-faces)
(defface my-org-emphasis-verbatim
  '((((class color) (min-colors 88) (background light))
     :background "#F7B80A")
    (((class color) (min-colors 88) (background dark))
     :background "#6DA906"))
  "My strike-through emphasis for Org."
  :group 'org-faces)
(setq org-emphasis-alist
  '(("*" my-org-emphasis-bold)
	("/" my-org-emphasis-italic)
	("_" my-org-emphasis-underline)
	("~" org-code verbatim)
	("+" my-org-emphasis-strike-through)
	("=" my-org-emphasis-verbatim)))

开启variable-pitch-mode 之后中文文字可以正常被加粗显示。如果不开启的话,中文字体就不能显示加粗,目前不知道是怎么回事。