--------------1FE39C3C8060CF558309DAD9
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Herbert Thoma wrote:
> Hi!
>
> > (let* ((notes (gnc:account-get-notes a))
> > + (notes (if notes notes ""))
> > (key-start (string-search notes key 0))
>
> I inserted the line and got another error (I omited the + ;-) )
>
> Error: gnc_report_error_dialog: gnc_report_error_dialog: error running report.
> /usr/local/share/gnucash/scm/report/tax.scm:172:39: In procedure gnc:account-val
> ue-print-info in expression (gnc:account-value-print-info #f):
> /usr/local/share/gnucash/scm/report/tax.scm:172:39: Wrong number of arguments to
> #<primitive-procedure gnc:account-value-print-info>
. . .
> 30* [render-level-x-account 1 1 #<pt-Account*:0x825A308> 186.7 #t #f]
> 31 (let* (# # # # ...) (if # # #))
> 32* [gnc:amount->string 186.7 ...
> 33* [gnc:account-value-print-info #f]
>
>
> Error: gnc_run_report: Report output was not a string.
>
>
> gtkhtml-CRITICAL **: file gtkhtml-stream.c: line 59 (gtk_html_stream_write):
> assertion `buffer != NULL' failed.
>
> Herbert.
> --
> Herbert Thoma
> FhG-IIS A, Studio Department
> Am Weichselgarten3, 91058 Erlangen, Germany
> Phone: +49-9131-776-323
> Fax: +49-9131-776-399
> email: tma@iis.fhg.de
> www: http://www.iis.fhg.de/
I finally got the latest to compile and I have a fix for this bug. Below is a diff for
the following version of tax.scm:
;; $Id: tax.scm,v 1.4 2000/11/09 00:32:09 peticolas Exp $
----------------------------------
171,172c171,172
< (value (gnc:amount->string lx-value
< (gnc:account-value-print-info #f)))
---
> (print-info (gnc:account-value-print-info account #f))
> (value (gnc:amount->string lx-value print-info))
189,191c189
< (not (equal? value
< (gnc:amount->formatted-string
< 0.0 (gnc:account-value-print-info #f)))))
---
> (not (equal? value (gnc:amount->string 0 print-info))))
233a232
> (notes (if notes notes ""))
----------------------------------
--
Gilligan | __o .oooO
/| _ \<,_ ( )
/p|\ (_)/ (_) \ ( Oooo.
/ | \ ------------ \_) ( )
======== ) /
======== gilligan@mpinet.net (_/
~~~~~~~~~~~~~~~~ uschold@cs.ucf.edu
--------------1FE39C3C8060CF558309DAD9
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
Herbert Thoma wrote:
Hi!
> (let* ((notes (gnc:account-get-notes a))
> + (notes (if notes
notes ""))
> (key-start
(string-search notes key 0))
I inserted the line and got another error (I omited the + ;-) )
Error: gnc_report_error_dialog: gnc_report_error_dialog: error running
report.
/usr/local/share/gnucash/scm/report/tax.scm:172:39: In procedure gnc:account-val
ue-print-info in expression (gnc:account-value-print-info #f):
/usr/local/share/gnucash/scm/report/tax.scm:172:39: Wrong number of
arguments to
#<primitive-procedure gnc:account-value-print-info>
. . .
30* [render-level-x-account 1 1 #<pt-Account*:0x825A308>
186.7 #t #f]
31 (let* (# # # # ...) (if # # #))
32* [gnc:amount->string 186.7 ...
33* [gnc:account-value-print-info #f]
Error: gnc_run_report: Report output was not a string.
gtkhtml-CRITICAL **: file gtkhtml-stream.c: line 59 (gtk_html_stream_write):
assertion `buffer != NULL' failed.
Herbert.
--
Herbert Thoma
FhG-IIS A, Studio Department
Am Weichselgarten3, 91058 Erlangen, Germany
Phone: +49-9131-776-323
Fax: +49-9131-776-399
email: tma@iis.fhg.de
www: http://www.iis.fhg.de/
I finally got the latest to compile and I have a fix for this bug.
Below is a diff for the following version of tax.scm:
;; $Id: tax.scm,v 1.4 2000/11/09 00:32:09 peticolas Exp $
----------------------------------
171,172c171,172
< (value (gnc:amount->string lx-value
<
(gnc:account-value-print-info #f)))
---
> (print-info (gnc:account-value-print-info
account #f))
> (value (gnc:amount->string lx-value print-info))
189,191c189
<
(not (equal? value
<
(gnc:amount->formatted-string
<
0.0 (gnc:account-value-print-info #f)))))
---
>
(not (equal? value (gnc:amount->string 0 print-info))))
233a232
> (notes (if notes notes ""))
----------------------------------
--
Gilligan | __o .oooO
/| _ \<,_ ( )
/p|\ (_)/ (_) \ ( Oooo.
/ | \ ------------ \_) ( )
======== ) /
======== gilligan@mpinet.net (_/
~~~~~~~~~~~~~~~~ uschold@cs.ucf.edu