IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

[html-table] fix never-used function and deprecate

Browse Source
This commit is contained in:
Christopher Lam 2019-06-28 10:59:50 +08:00
parent a23d72dec2
commit cc4944e536
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gnucash/report/report-system/html-table.scm
View File

@ -569,11 +569,13 @@
(cons (cons
(cons (cons current-new current-existing) (car rest-result)) (cons (cons current-new current-existing) (car rest-result))
(cdr rest-result))))) (cdr rest-result)))))
(issue-deprecation-warning "gnc:html-table-prepend-column! is unused.")
(let* ((existing-data (reverse (gnc:html-table-data table))) (let* ((existing-data (reverse (gnc:html-table-data table)))
(existing-length (length existing-data)) (existing-length (length existing-data))
(newcol-length (length newcol))) (newcol-length (length newcol)))
(if (<= newcol-length existing-length) (if (<= newcol-length existing-length)
(gnc:html-table-set-data! (gnc:html-table-set-data!
table
(reverse (car (prepend-to-element (reverse (car (prepend-to-element
newcol newcol
existing-data existing-data