From 2ae9f8697c6d416126e76c8a46a0442da5761716 Mon Sep 17 00:00:00 2001 From: Geert Janssens Date: Tue, 12 Jan 2010 18:08:17 +0000 Subject: [PATCH] Bug #348701 Wrong currency symbol when currency is set to DKK This fix reverts changeset r7200, which caused some currency symbols to be replaced with the EURO sign. This replacement was a workaround for gtkhtml1 and no longer needed. git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@18563 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/report/report-system/html-style-info.scm | 12 +++--------- 1 file changed, 3 insertions(+), 9 deletions(-) diff --git a/src/report/report-system/html-style-info.scm b/src/report/report-system/html-style-info.scm index d5de41230f..f88caaffc4 100644 --- a/src/report/report-system/html-style-info.scm +++ b/src/report/report-system/html-style-info.scm @@ -284,15 +284,9 @@ (xaccPrintAmount datum (gnc-default-print-info #f))) (define (gnc:default-html-gnc-monetary-renderer datum params) - (let* ((result (xaccPrintAmount - (gnc:gnc-monetary-amount datum) - (gnc-commodity-print-info - (gnc:gnc-monetary-commodity datum) #t))) - (ind (string-index result (integer->char 164)))) - (if ind - (string-append (substring result 0 ind) "€" - (substring result (+ 1 ind) (string-length result))) - result))) + (xaccPrintAmount + (gnc:gnc-monetary-amount datum) + (gnc-commodity-print-info (gnc:gnc-monetary-commodity datum) #t))) (define (gnc:default-html-number-renderer datum params) (xaccPrintAmount