diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2021-04-09 23:41:32 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2021-04-09 23:41:32 +0200 |
commit | 5469bc4e552784c2d4f1b32984b95c371fbd4425 (patch) | |
tree | 368752b401557cbb288e09f04d792c40de0b756d | |
parent | 71169144275f9c420c0b613429410af9e59f2ba9 (diff) | |
download | org-mode-5469bc4e552784c2d4f1b32984b95c371fbd4425.tar.gz |
colview: Ignore operators associated to special properties
* lisp/org-colview.el (org-columns--compute-spec): Ignore operator
associated to a special properties.
This is a followup to e1b8d1d2b4ef46e0c4ef591536a77eeeed45d998.
-rw-r--r-- | lisp/org-colview.el | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el index d80fa8e..517bcdf 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -1165,14 +1165,13 @@ properties drawers." (last-level lmax) (property (car spec)) (printf (nth 4 spec)) - (operator (nth 3 spec)) + ;; Special properties cannot be collected nor summarized, as + ;; they have their own way to be computed. Therefore, ignore + ;; any operator attached to them. + (operator (and (not (member property org-special-properties)) + (nth 3 spec))) (collect (and operator (org-columns--collect operator))) - (summarize (and operator (org-columns--summarize operator))) - ;; Special properties are not set in a property drawer, and - ;; therefore should not be updated. - (update - (and update - (not (member property org-special-properties))))) + (summarize (and operator (org-columns--summarize operator)))) (org-with-wide-buffer ;; Find the region to compute. (goto-char org-columns-top-level-marker) |