diff options
author | Marco Wahl <marcowahlsoft@gmail.com> | 2020-01-27 23:39:25 +0100 |
---|---|---|
committer | Marco Wahl <marcowahlsoft@gmail.com> | 2020-01-27 23:39:25 +0100 |
commit | 1e55b1819852e4a627c3054b274b06e85c4ca095 (patch) | |
tree | 2d1a00c6bb7abe8feb9b21b279dd07fa4e32f11b | |
parent | 42ad65643687ef083dab8dea9ebffe3aa4095200 (diff) | |
download | org-mode-1e55b1819852e4a627c3054b274b06e85c4ca095.tar.gz |
org-colview: Fix org-agenda-columns-active
* lisp/org-colview.el (org-agenda-columns): Set
org-agenda-columns-active when columns get activated.
-rw-r--r-- | lisp/org-colview.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el index 91ef23c..bb24443 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -1619,6 +1619,7 @@ PARAMS is a property list of parameters: (dolist (entry cache) (goto-char (car entry)) (org-columns--display-here (cdr entry))) + (setq-local org-agenda-columns-active t) (when org-agenda-columns-show-summaries (org-agenda-colview-summarize cache))))))) @@ -1683,8 +1684,7 @@ This will add overlays to the date lines, to show the summary for each day." 'face 'bold final)) (list spec final final))))) fmt) - 'dateline) - (setq-local org-agenda-columns-active t)))) + 'dateline)))) (if (bobp) (throw :complete t) (forward-line -1))))))) (defun org-agenda-colview-compute (fmt) |