scip/dot-emacs
1
0
Fork 0
mirror of https://codeberg.org/scip/dot-emacs.git synced 2025-12-17 12:30:59 +01:00
Code Issues Packages Projects Releases Wiki Activity

fixed agenda sorting, must be global

Browse Source
This commit is contained in:
Thomas von Dein
2018-12-13 09:22:58 +01:00
parent b3362c6f09
commit 9296f90304
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
.emacs
View File

@@ -1,4 +1,4 @@
;; Toms Emacs Config - portable - version ("20181212.01") -*-emacs-lisp-*- ;; Toms Emacs Config - portable - version ("20181212.02") -*-emacs-lisp-*-
;; * Introduction ;; * Introduction
;; This is my emacs config, it is more than twenty years old. It ;; This is my emacs config, it is more than twenty years old. It
@@ -739,6 +739,9 @@
;; 20181212.01 ;; 20181212.01
;; - configured agenda sorting ;; - configured agenda sorting
;; 20181212.02
;; - fixed agenda sorting, must be global
;; ** TODO ;; ** TODO
;; - check helpful https://github.com/wilfred/helpful ;; - check helpful https://github.com/wilfred/helpful
@@ -766,7 +769,7 @@
;; My emacs config has a version (consisting of a timestamp with a ;; My emacs config has a version (consisting of a timestamp with a
;; serial), which I display in the mode line. So I can clearly see, if ;; serial), which I display in the mode line. So I can clearly see, if
;; I'm using an outdated config somewhere. ;; I'm using an outdated config somewhere.
(defvar tvd-emacs-version "20181212.01") (defvar tvd-emacs-version "20181212.02")
;; -------------------------------------------------------------------------------- ;; --------------------------------------------------------------------------------
@@ -3870,8 +3873,7 @@ down and unfold it, otherwise jump paragraph as usual."
(tags "CATEGORY=\"WORK\"" (tags "CATEGORY=\"WORK\""
((org-agenda-skip-function '(org-agenda-skip-entry-if 'todo '("CANCEL" "START" "DONE" "TODO"))) ((org-agenda-skip-function '(org-agenda-skip-entry-if 'todo '("CANCEL" "START" "DONE" "TODO")))
(org-agenda-overriding-header "\nTasks Waiting:")))) (org-agenda-overriding-header "\nTasks Waiting:"))))
((org-agenda-compact-blocks t) ((org-agenda-compact-blocks t)))))
(org-agenda-sorting-strategy '(priority-down timestamp-down))))))
;; A shortcut to reach my custom view directly ;; A shortcut to reach my custom view directly
(defun agenda () (defun agenda ()
@@ -3983,7 +3985,8 @@ _a_: add a note to the entry _B_: bulk action
(add-hook 'org-agenda-mode-hook '(lambda () (progn (add-hook 'org-agenda-mode-hook '(lambda () (progn
(setq org-agenda-follow-mode t (setq org-agenda-follow-mode t
org-log-into-drawer t org-log-into-drawer t
org-agenda-entry-text-mode t) org-agenda-entry-text-mode t
org-agenda-sorting-strategy '(priority-down timestamp-down))
(local-set-key (kbd "n") 'tvd-org-agenda-capture) (local-set-key (kbd "n") 'tvd-org-agenda-capture)
(local-set-key (kbd "o") 'tvd-org-agenda-solitair) (local-set-key (kbd "o") 'tvd-org-agenda-solitair)
(local-set-key (kbd "a") 'tvd-org-agenda-edit-entry) (local-set-key (kbd "a") 'tvd-org-agenda-edit-entry)