mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-11-30 20:54:08 -06:00
[test-extras] (gnc:options->sxml) dumps better error
The exception catcher gives a (k . args) pair which contain useful information about the exception. Show in test log output.
This commit is contained in:
parent
768132236a
commit
82edec26fc
@ -83,8 +83,8 @@
|
||||
#:trim-whitespace? #t
|
||||
#:entities '((nbsp . "\xa0"))))
|
||||
(lambda (k . args)
|
||||
(format #t "*** XML error: ~a ~a\n~a"
|
||||
prefix test-title
|
||||
(format #t "*** XML error: ~a ~a: ~a / ~a\n~a"
|
||||
prefix test-title k args
|
||||
(gnc:html-render-options-changed options #t))
|
||||
(throw k args)))))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user