Use font-awesome to display org checkboxes
This commit is contained in:
parent
9571771281
commit
9c753fae7e
2 changed files with 10 additions and 9 deletions
|
@ -4,7 +4,7 @@
|
|||
|
||||
;; Author: Tom Willemse <tom@ryuslash.org>
|
||||
;; Keywords: local
|
||||
;; Version: 2020.0410.185314
|
||||
;; Version: 2020.0413.003809
|
||||
;; Package-Requires: (oni-ui oni-hydra yoshi-theme diminish)
|
||||
|
||||
;; This program is free software; you can redistribute it and/or modify
|
||||
|
@ -51,6 +51,9 @@ If FRAME is nil, they’re set for the current frame."
|
|||
(set-fontset-font t ? font-awesome frame)
|
||||
(set-fontset-font t ? font-awesome frame)
|
||||
(set-fontset-font t oni-gui-arev-icon font-awesome frame))
|
||||
(let ((font-awesome "Font Awesome 5 Free Regular-12"))
|
||||
(set-fontset-font t ? font-awesome frame)
|
||||
(set-fontset-font t ? font-awesome frame))
|
||||
(let ((dejavu-sans-mono "DejaVu Sans Mono-12"))
|
||||
(set-fontset-font t ?◉ dejavu-sans-mono frame)
|
||||
(set-fontset-font t ?○ dejavu-sans-mono frame)
|
||||
|
|
|
@ -4,8 +4,8 @@
|
|||
|
||||
;; Author: Tom Willemse <tom@ryuslash.org>
|
||||
;; Keywords: local
|
||||
;; Version: 2020.0409.113204
|
||||
;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org-plus-contrib org-bullets org-edna diminish)
|
||||
;; Version: 2020.0413.003316
|
||||
;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org-plus-contrib org-bullets org-edna diminish all-the-icons)
|
||||
|
||||
;; This program is free software; you can redistribute it and/or modify
|
||||
;; it under the terms of the GNU General Public License as published by
|
||||
|
@ -57,12 +57,10 @@ installs it will always be ~."
|
|||
|
||||
(defun oni-org-setup-prettify-symbols-mode ()
|
||||
"Set up prettify symbols mode for org mode."
|
||||
(when (member "Ionicons" (font-family-list))
|
||||
(setq-local prettify-symbols-alist
|
||||
'(("[ ]" . #xf372)
|
||||
("[X]" . #xf374)))
|
||||
(set-face-attribute 'org-checkbox nil :family "Ionicons")
|
||||
(prettify-symbols-mode)))
|
||||
(setq-local prettify-symbols-alist
|
||||
'(("[ ]" . ?)
|
||||
("[X]" . ?)))
|
||||
(prettify-symbols-mode))
|
||||
|
||||
(defun oni-org-heading-has-predecessor-p ()
|
||||
"Determine if the heading at point has any predecessors.
|
||||
|
|
Loading…
Reference in a new issue