harrybournis / org-fancy-priorities Goto Github PK

;; ~/.doom.d/packages.el
;; Followed this fantastic tutorial for the initial install: https://youtu.be/WSF4EgQqa3Q?t=185
(package! org-fancy-priorities)

;; ~/.doom.d/init.el
(doom! 
       :completion
       (company +tng) 
       ivy                 

       :ui
       doom                
       (emoji +unicode) 
       fill-column       
       hl-todo             
       (ligatures +extra +hasklig)  
       (popup +defaults) 
       treemacs         
       unicode            
       workspaces         

       :editor
       (evil +everywhere)  
       word-wrap          

       :emacs
       (dired +icons)      
       electric         
       (ibuffer +icons)    

       :os
       tty            

       :lang
       (org +dragndrop +pretty)              

       :config
       (default +bindings +smartparens))

;; ~/.doom.d/config.el
(after! org
  (setq!
   org-directory "~/agenda-dir/"
   org-todo-keywords '((sequence "TODO(t)" "DONE(d!)"))
   org-priority-highest '?A
   org-priority-lowest  '?D
   org-priority-default '?D
   org-priority-start-cycle-with-default t
   org-priority-faces '((?A :foreground "#F54768")
                        (?B :foreground "#F5C747")
                        (?C :foreground "#62A6EB")
                        (?D :foreground "#A0A0A0"))
   )
)

;; suggestion from @harrybournis 
(add-hook! 'org-mode-hook 'org-fancy-priorities-mode)
(add-hook! 'org-agenda-mode-hook 'org-fancy-priorities-mode)

(after! org-fancy-priorities
  (setq!
   org-fancy-priorities-list
   '("🅐" "🅑" "🅒" "🅓")
   ))

(after! org-agenda
  (setq!
   org-agenda-files (directory-files-recursively "~/agenda-dir/" "\\.org$")
   ))

#+SETUPFILE: ~/tmp/1.setup

* TODO [#A] check |- (alphapapa/org-super-agenda: Supercharge your Org daily/weekly agenda by grouping items) :BOOKMARK:
:PROPERTIES:
:CREATED: [2018-02-28 Wed 08:18]
:Source: https://github.com/alphapapa/org-super-agenda/
:END:
* TODO report clock report alignment problem when "|" is in the task name
:PROPERTIES:
:CREATED: [2018-02-28 Wed 20:28]
:END:
:LOGBOOK:
CLOCK: [2018-02-28 Wed 20:28]--[2018-02-28 Wed 20:29] =>  0:01
:END:

(eval-and-compile
  (require 'package)
  (setq package-archives '(("MELPA" . "http://melpa.org/packages/")
			   ("ELPA" . "http://tromey.com/elpa/")
			   ("gnu"  . "http://elpa.gnu.org/packages/")
			   ("SC"   . "http://joseito.republika.pl/sunrise-commander/")
                           ("org" . "http://orgmode.org/elpa/")
                           )
	load-prefer-newer t
	package-user-dir "~/.emacs.d/elpa"
	package--init-file-ensured t
	package-enable-at-startup nil)
  (unless (file-directory-p package-user-dir)
    (make-directory package-user-dir t))
  (setq load-path (append load-path '("~/.emacs.d/site-lisp/")))
  (setq load-path (append load-path (directory-files "~/.emacs.d/site-lisp/" t "^[^.]" t)))
  (setq load-path (append load-path (directory-files package-user-dir t "^[^.]" t)))
  (package-initialize))

(unless (package-installed-p 'use-package)
  (package-refresh-contents)
  (package-install 'use-package))
(eval-when-compile
  (require 'use-package))
(use-package diminish :ensure t)
(require 'bind-key)


(use-package org-fancy-priorities
  :ensure t
  :hook 
  (org-mode . org-fancy-priorities-mode)
  :config
  (setq org-fancy-priorities-list '("⚡" "⬆" "⬇" "☕")))

(use-package org
  :mode ("\\.org$" . org-mode)
  :demand t
  :init
  (setq org-agenda-files '("~/tmp/6.org"))
)