From d417d9e7935f48883dc79276f4fdb970b5e83ec5 Mon Sep 17 00:00:00 2001 From: tastytea Date: Thu, 26 Nov 2020 12:06:43 +0100 Subject: [PATCH] Emacs: Org: Show agenda for next 6 months, don't show empty days. Also make C-a global keybinding for `org-agenda`. --- init.d/text/misc.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/init.d/text/misc.el b/init.d/text/misc.el index be49ba1..e6f2ec9 100644 --- a/init.d/text/misc.el +++ b/init.d/text/misc.el @@ -1,6 +1,6 @@ ;;; misc.el --- Miscellaneous file formats. -*- lexical-binding: t; -*- -;; Time-stamp: <2020-11-18T18:32:20+0100> +;; Time-stamp: <2020-11-26T12:05:53+0100> ;;; Commentary: @@ -111,7 +111,9 @@ (org-latex-compiler "xelatex") (org-agenda-files '("~/notes.org" "~/Dokumente/Videoserien.org")) (org-blank-before-new-entry - '((heading . nil) (plain-list-item . auto)))) + '((heading . nil) (plain-list-item . auto))) + (org-agenda-show-all-dates nil) + (org-agenda-span (* 30.5 6))) :config (progn (set-face-attribute 'org-level-1 nil :height 1.4) (set-face-attribute 'org-level-2 nil :height 1.2) (org-babel-do-load-languages 'org-babel-load-languages @@ -128,6 +130,7 @@ "8/#\\+[dD][aA][tT][eE]: <+%Y-%02m-%02d %H:%M>"))) :bind (("C-c o" . (lambda () (interactive) ; Open notes. (find-file org-default-notes-file))) + ("C-c a" . org-agenda) (:map org-mode-map ; Remove some annoying keybindings. ("M-" . nil) ("C-c M-" . org-metaleft) @@ -160,8 +163,7 @@ ("C-S-" . nil) ("C-c C-S-" . org-shiftcontrolup) ("C-S-" . nil) - ("C-c C-S-" . org-shiftcontroldown) - ("C-c a" . org-agenda)))) + ("C-c C-S-" . org-shiftcontroldown)))) (use-package org-bullets :after org