Quellcode durchsuchen

Merge branch 'maint'

Nicolas Goaziou vor 3 Jahren
Ursprung
Commit
b07a31cbd7
1 geänderte Dateien mit 6 neuen und 7 gelöschten Zeilen
  1. 6 7
      lisp/org-colview.el

+ 6 - 7
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)