diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 33f10b33d..8f2b71fd5 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2008-09-24 Carsten Dominik + * org-table.el (org-table-sum): Do not format the result with %g, + it does rounding when there are too many digits. + * org.el (org-map-entries): Protect the keyword-selecting variables. 2008-09-23 Bastien Guerry diff --git a/lisp/org-table.el b/lisp/org-table.el index 247bb6ec5..e5cfaecfb 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -1644,7 +1644,7 @@ If NLAST is a number, only the NLAST fields will actually be summed." items1))) (res (apply '+ numbers)) (sres (if (= org-timecnt 0) - (format "%g" res) + (number-to-string res) (setq diff (* 3600 res) h (floor (/ diff 3600)) diff (mod diff 3600) m (floor (/ diff 60)) diff (mod diff 60)