Bug 549738: Make "today" the default date of the aging reports.

BP


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@17483 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Charles Day 2008-08-31 23:30:56 +00:00
parent a2f05a3eae
commit c2eb587552

View File

@ -323,6 +323,11 @@
(gnc:options-add-report-date!
options gnc:pagename-general
optname-to-date "a")
;; Use a default report date of 'today'
(gnc:option-set-value (gnc:lookup-option options
gnc:pagename-general
optname-to-date)
(cons 'relative 'today))
;; all about currencies
(gnc:options-add-currency!
@ -521,7 +526,7 @@ totals to report currency")
;; document will be the HTML document that we return.
(report-date (gnc:timepair-end-day-time
(gnc:date-option-absolute-time
(op-value gnc:pagename-general (N_ "To")))))
(op-value gnc:pagename-general optname-to-date))))
(interval-vec (list->vector (make-interval-list report-date)))
(sort-pred (get-sort-pred
(op-value gnc:pagename-general optname-sort-by)