forked from mirrors/org-mode
org-colview: Fix org-agenda-columns-active
* lisp/org-colview.el (org-agenda-columns): Set org-agenda-columns-active when columns get activated.
This commit is contained in:
parent
42ad656436
commit
1e55b18198
|
@ -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)
|
||||
|
|
Loading…
Reference in a new issue