gnucash maint: Bug 797982 - exchange rates' decimal places (bis)

[Christopher Lam]

Updated	 via  https://github.com/Gnucash/gnucash/commit/a6c8a806 (commit)
	from  https://github.com/Gnucash/gnucash/commit/fedaa133 (commit)



commit a6c8a806f37f1ba182e954942324fff5cb95dc2b
Author: Christopher Lam <christopher.lck at gmail.com>
Date:   Tue Oct 27 11:03:05 2020 +0800

    Bug 797982 - exchange rates' decimal places (bis)
    
    Bug introduced in e7165507c. We need to normalize date for
    pricedb-nearest to avoid getting next day price.

diff --git a/gnucash/report/commodity-utilities.scm b/gnucash/report/commodity-utilities.scm
index e777a2a84..2dd1e6dce 100644
--- a/gnucash/report/commodity-utilities.scm
+++ b/gnucash/report/commodity-utilities.scm
@@ -768,7 +768,8 @@
 (define (gnc:case-price-fn source target-curr date)
   (define pdb (gnc-pricedb-get-db (gnc-get-current-book)))
   (case source
-    ((pricedb-nearest) (cut gnc-pricedb-get-nearest-price pdb <> target-curr date))
+    ((pricedb-nearest) (cut gnc-pricedb-get-nearest-price pdb <> target-curr
+                            (time64CanonicalDayTime date)))
     ((pricedb-latest)  (cut gnc-pricedb-get-latest-price pdb <> target-curr))
     (else
      (lambda (commodity)



Summary of changes:
 gnucash/report/commodity-utilities.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)