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

agenda split left

Browse Source
This commit is contained in:
Thomas von Dein
2019-05-21 13:41:32 +02:00
parent 1bb64abfa9
commit 645e44ee0a
1 changed files with 9 additions and 4 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 ("20190520.01") -*-emacs-lisp-*- ;; Toms Emacs Config - portable - version ("20190521.01") -*-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
@@ -778,6 +778,9 @@
;; 20190520.01 ;; 20190520.01
;; - fixed 'n' in agenda, added 'k', fixed scheduled task template ;; - fixed 'n' in agenda, added 'k', fixed scheduled task template
;; 20190521.01
;; - split agenda window left
;; ** TODO ;; ** TODO
;; - check helpful https://github.com/wilfred/helpful ;; - check helpful https://github.com/wilfred/helpful
@@ -805,7 +808,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 "20190520.01") (defvar tvd-emacs-version "20190521.01")
;; -------------------------------------------------------------------------------- ;; --------------------------------------------------------------------------------
@@ -3960,9 +3963,11 @@ down and unfold it, otherwise jump paragraph as usual."
;; A shortcut to reach my custom view directly ;; A shortcut to reach my custom view directly
(defun agenda () (defun agenda ()
"Visit my org agenda directly." "Visit my org agenda directly, splits left"
(interactive) (interactive)
(org-agenda nil "o")) (org-agenda nil "o")
(tvd-flip-windows)
(other-window-or-switch-buffer))
;; Add a line of text to the top of an existing TODO entry and refresh ;; Add a line of text to the top of an existing TODO entry and refresh
;; the agenda ;; the agenda