diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-05-21 00:07:56 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-05-21 00:07:56 +0200 |
commit | fbc537511824068640e456ce0f84372c5895abf5 (patch) | |
tree | 89bad9e984ed2f4e6fca0181a39b91e65e3a28de | |
parent | d71e708fe35805ee390ae5bf734f8edea09c52c7 (diff) | |
parent | 3e3e4e621b7bd50fa99d9c0227d9673bd9f734b0 (diff) | |
download | org-mode-fbc537511824068640e456ce0f84372c5895abf5.tar.gz |
Merge branch 'maint'
-rw-r--r-- | lisp/org-colview.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el index 67a0d4d..592ea0a 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -1273,7 +1273,7 @@ When PRINTF is non-nil, use it to format the result." (/ (apply #'+ (mapcar #'org-columns--age-to-minutes ages)) (float (length ages))))) -(defun org-columns--summary-estimate (estimates printf) +(defun org-columns--summary-estimate (estimates _) "Combine a list of estimates, using mean and variance. The mean and variance of the result will be the sum of the means and variances (respectively) of the individual estimates." @@ -1288,8 +1288,8 @@ and variances (respectively) of the individual estimates." (`(,value) (cl-incf mean value)))) (let ((sd (sqrt var))) (format "%s-%s" - (format (or printf "%.0f") (- mean sd)) - (format (or printf "%.0f") (+ mean sd)))))) + (format "%.0f" (- mean sd)) + (format "%.0f" (+ mean sd)))))) |