Revert "Bug 796952 - Report formatting (justify) is broken"

This reverts commit 35ed4cf2, restoring indenting for account
summary. The next commit will fix the indented amounts to land under
the 'Balance' header.

This fixes: Bug 797332 - Account Summary Report balance lacks
indentation
This commit is contained in:
Christopher Lam 2019-09-06 00:18:21 +08:00
parent 25cc330722
commit 3764a053cf

View File

@ -457,23 +457,25 @@
) )
(if show-account-bals? (if show-account-bals?
(gnc:html-table-set-cell/tag! (gnc:html-table-set-cell/tag!
build-table 0 (1+ cur-col) "number-header" build-table 0 (+ cur-col account-cols) "number-header"
(_ "Balance")) (_ "Balance"))
) )
(let ((row 0)) (let ((row 0))
(while (< row table-rows) (while (< row table-rows)
(let ((col 1)) (gnc:html-table-set-row-markup! build-table (+ row 1)
(gnc:html-table-set-cell! build-table (1+ row) cur-col (gnc:html-table-row-markup hold-table row))
(gnc:html-table-get-cell hold-table row 0)) (let ((col 0))
(if show-account-bals?
(while (< col hold-table-width) (while (< col hold-table-width)
(if (gnc:html-table-get-cell hold-table row col)
(gnc:html-table-set-cell! (gnc:html-table-set-cell!
build-table (1+ row) (1+ cur-col) build-table (+ row 1) (+ cur-col col)
(gnc:html-table-get-cell hold-table row col))) (gnc:html-table-get-cell hold-table row col)
(set! col (1+ col))))) )
(set! row (1+ row)))) (set! col (+ col 1))
(set! cur-col (+ cur-col (if show-account-bals? 2 1))) )
)
(set! row (+ row 1))
)
)
(set! cur-col (+ cur-col hold-table-width)) (set! cur-col (+ cur-col hold-table-width))
(if show-account-notes? (if show-account-notes?
(begin (begin