mirror of
https://github.com/Gnucash/gnucash.git
synced 2026-09-03 20:53:02 -05:00
Advanced Portfolio: Use the correct function to get today's date.
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@23724 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
@@ -443,9 +443,9 @@
|
||||
(let ((split-list (reverse (gnc:get-match-commodity-splits-sorted
|
||||
(list current)
|
||||
(case price-source
|
||||
((pricedb-latest) (timespec-now))
|
||||
((pricedb-latest) (gnc:get-today))
|
||||
((pricedb-nearest) to-date)
|
||||
(else (timespec-now))) ;; error, but don't crash
|
||||
(else (gnc:get-today))) ;; error, but don't crash
|
||||
#f)))) ;; Any currency
|
||||
;; Find the first (most recent) one that can be converted to report currency
|
||||
(while (and (not use-txn) (not (eqv? split-list '())))
|
||||
|
||||
Reference in New Issue
Block a user