From 138aa488116651e1cf21d11ab179b56089a38929 Mon Sep 17 00:00:00 2001 From: KJ Date: Sun, 24 Sep 2023 16:08:26 -0400 Subject: [PATCH] Change org-fancy-priorities to prettify-symbols-mode. prettify-symbols-mode is a mode build-in into org-mode. So, we use the one that already have instead add another package that do the same. --- configs/init-org.el | 30 +++++++++--------------------- 1 file changed, 9 insertions(+), 21 deletions(-) diff --git a/configs/init-org.el b/configs/init-org.el index 0c35914..8f4bc8b 100644 --- a/configs/init-org.el +++ b/configs/init-org.el @@ -45,6 +45,15 @@ :strike-through t :foreground "light gray") + ;; Embellecer las prioridades + (setq org-highest-priority ?A + org-default-priority ?B + org-lowest-priority ?D) ;; Cambiar prioridades de A,B,C a A,B,C,D + (push '("[#A]" . "⚡" ) prettify-symbols-alist) + (push '("[#B]" . "🔥" ) prettify-symbols-alist) + (push '("[#C]" . "🐢" ) prettify-symbols-alist) + (push '("[#D]" . "☕" ) prettify-symbols-alist) + (prettify-symbols-mode) ) ;; org-mode @@ -83,15 +92,6 @@ ("CANCELED" . "#aaa")) ) - - ;; Embellecer los checkbox - ;; (add-hook 'org-mode-hook (lambda () - ;; "Beautify Org Checkbox Symbol" - ;; (push '("[ ]" . "☐") prettify-symbols-alist) - ;; (push '("[X]" . "☑" ) prettify-symbols-alist) - ;; (push '("[-]" . "❍" ) prettify-symbols-alist) - ;; (prettify-symbols-mode))) - ;; Tachar los checkbox marcados como terminados (defface org-checkbox-done-text '((t (:foreground "#71696A" :strike-through t))) @@ -197,18 +197,6 @@ :ensure t :hook (org-mode . org-autolist-mode)) -;; Emojis en lugar de letras para las prioridades en org-mode. -(use-package org-fancy-priorities - :defer t - :ensure t - :hook (org-mode . org-fancy-priorities-mode) - :config - (setq org-highest-priority ?A - org-default-priority ?B - org-lowest-priority ?D - org-fancy-priorities-list '("⚡" "🔥" "🐢" "☕")) - ) - ;; Org mode en modo presentación (use-package org-present :defer t