r18563 - gnucash/trunk/src/report/report-system - Bug #348701 Wrong currency symbol when currency is set to DKK

Geert Janssens gjanssens at code.gnucash.org
Tue Jan 12 13:08:17 EST 2010


Author: gjanssens
Date: 2010-01-12 13:08:17 -0500 (Tue, 12 Jan 2010)
New Revision: 18563
Trac: http://svn.gnucash.org/trac/changeset/18563

Modified:
   gnucash/trunk/src/report/report-system/html-style-info.scm
Log:
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.

Modified: gnucash/trunk/src/report/report-system/html-style-info.scm
===================================================================
--- gnucash/trunk/src/report/report-system/html-style-info.scm	2010-01-12 15:13:54 UTC (rev 18562)
+++ gnucash/trunk/src/report/report-system/html-style-info.scm	2010-01-12 18:08:17 UTC (rev 18563)
@@ -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



More information about the gnucash-changes mailing list