mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
[balsheet-eg] remove unused functions
This commit is contained in:
parent
76fdbfc5fc
commit
90c8a1e3c2
@ -338,21 +338,6 @@
|
||||
|
||||
(html #f))
|
||||
|
||||
;; end of all the lets. time for some real code
|
||||
|
||||
;; The following routines are defined inside
|
||||
;; the renderer to make options available:
|
||||
|
||||
;; number formatting stuff
|
||||
(define (fmtnumber n)
|
||||
;; format double n with as many decimal places as required
|
||||
(number->string (if (integer? n) (inexact->exact n) n)))
|
||||
(define (fmtnumeric n)
|
||||
;; format gnc-numeric n for printing
|
||||
(fmtnumber (gnc-numeric-to-double n)))
|
||||
|
||||
;; HTML-specific formatting
|
||||
|
||||
(define (negstyle item)
|
||||
;; apply styling for negative amounts
|
||||
(string-append "<span class=\"negative\">" item "</span>"))
|
||||
|
Loading…
Reference in New Issue
Block a user