Better org agenda settings

1 files changed, 13 insertions, 3 deletions

diff --git a/emacs/init.el b/emacs/init.el
index b8cd99e..523c947 100644
--- a/emacs/init.el
+++ b/emacs/init.el
@@ -319,12 +319,22 @@ The misspelled word is taken from OVERLAY.  WORD is the corrected word."
                                  :empty-lines 1)
                                 ))
 
-(setopt org-agenda-block-separator ?─)
+(setopt org-agenda-block-separator nil)
+(setopt org-agenda-include-deadlines t)
+;; Always start the weekly agenda for a week from today
+(setopt org-agenda-start-on-weekday nil)
+;; Show week of agenda by default
+(setopt org-agenda-span 'week)
+(setopt org-agenda-prefix-format '((agenda . " %i %?-12t% s")
+                                   (todo . " %i ")
+                                   (tags . " %i ")
+                                   (search . " %i ")))
 (setopt org-agenda-time-grid '((daily today require-timed)
                                (800 1000 1200 1400 1600 1800 2000)
-                               " ┄┄┄┄┄ " "┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄"))
+                               "       " "               "))
 (setopt org-agenda-current-time-string
-        "◀── now ─────────────────────────────────────────────────")
+        "◀ you are here")
+(setopt org-support-shift-select 'always)
 
 ;; Make org html export more pleasant by default
 (setopt org-export-with-smart-quotes t)