From 3e3e4e621b7bd50fa99d9c0227d9673bd9f734b0 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sun, 21 May 2017 00:06:31 +0200 Subject: [PATCH] org-colview: Fix estimate's summary * lisp/org-colview.el (org-columns--summary-estimate): Per last commit, do not make use of printf, since values are not numbers. --- lisp/org-colview.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org-colview.el b/lisp/org-colview.el index 37662a4ee..d8c7bb4d5 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -1299,7 +1299,7 @@ When PRINTF is non-nil, use it to format the result." (/ (apply #'+ (mapcar #'org-columns--age-to-seconds 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." @@ -1314,8 +1314,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))))))