ryuslash/emacs-config
1
0
Fork 0
Code Activity

Use font-awesome to display org checkboxes

Browse source
This commit is contained in:
Tom Willemse 2020-04-13 00:40:22 -07:00
parent 9571771281
commit 9c753fae7e
2 changed files with 10 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
oni-gui.el
View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 2020.0410.185314 ;; Version: 2020.0413.003809
;; Package-Requires: (oni-ui oni-hydra yoshi-theme diminish) ;; Package-Requires: (oni-ui oni-hydra yoshi-theme diminish)
;; This program is free software; you can redistribute it and/or modify ;; 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 ? font-awesome frame) (set-fontset-font t ? font-awesome frame)
(set-fontset-font t oni-gui-arev-icon 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")) (let ((dejavu-sans-mono "DejaVu Sans Mono-12"))
(set-fontset-font t ?◉ dejavu-sans-mono frame) (set-fontset-font t ?◉ dejavu-sans-mono frame)
(set-fontset-font t ?○ dejavu-sans-mono frame) (set-fontset-font t ?○ dejavu-sans-mono frame)

12
oni-org/oni-org.el
View file

@ -4,8 +4,8 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 2020.0409.113204 ;; Version: 2020.0413.003316
;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org-plus-contrib org-bullets org-edna diminish) ;; 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 ;; 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 ;; 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 () (defun oni-org-setup-prettify-symbols-mode ()
"Set up prettify symbols mode for org mode." "Set up prettify symbols mode for org mode."
(when (member "Ionicons" (font-family-list))
(setq-local prettify-symbols-alist (setq-local prettify-symbols-alist
'(("[ ]" . #xf372) '(("[ ]" . ?)
("[X]" . #xf374))) ("[X]" . ?)))
(set-face-attribute 'org-checkbox nil :family "Ionicons") (prettify-symbols-mode))
(prettify-symbols-mode)))
(defun oni-org-heading-has-predecessor-p () (defun oni-org-heading-has-predecessor-p ()
"Determine if the heading at point has any predecessors. "Determine if the heading at point has any predecessors.