Tax Invoice fails in 2.3.13 -- eguile requires slib

[Chris Dennis]

Hello folks

I've just noticed that the eguile-based Tax Invoice fails in 2.3.13 
(I've just updated to r19230) with the error messages show below, which 
boils down to "Unbound variable: sub-vicinity".

This is probably related to Bugfix #615168 which seeks to remove slib.

eguile-utilities.scm requires slib, but hadn't explicitly used it.

Adding
   (use-modules (ice-9 slib))
to eguile-utilities.scm fixes the Tax Invoice again.

Shall I create a bug and submit the patch?

cheers

Chris


Full error dump:

In unknown file:
    ?:  3  (letrec ((dumper #)) (catch (quote ignore) (lambda () #) 
(lambda # #f)))
In 
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/main.scm:
  139:  4  [catch ignore #<procedure #f ()> #<procedure #f (key . args)>]
In unknown file:
    ?:  5* [#<procedure #f ()>]
In 
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/main.scm:
  142:  6* [lazy-catch #t #<procedure #f ()> #<procedure dumper (key . 
args)>]
In unknown file:
    ?:  7* [#<procedure #f ()>]
In 
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/main.scm:
  143:  8* [apply #<procedure #f ()> ()]
In unknown file:
    ?:  9  [#<procedure #f ()>]
In /usr/local/gnucash-svn-feb10/share/gnucash/scm/report.scm:
     ...
  675: 10  (set! html (gnc:report-render-html report #t))
  675: 11* [gnc:report-render-html # #t]
  638: 12  (if (and (not #) (gnc:report-ctext report)) (gnc:report-ctext 
report) ...)
  646: 13  (let ((template #) (doc #f)) (set! doc (if template # #f)) doc)
  649: 14* (set! doc (if template (let* (# # # ...) (if # # ...) ...) ...))
  649: 15* (if template (let* (# # # ...) (if # # ...) ...) ...)
  650: 16  (let* (# # # #) (if # # #) (gnc:report-set-ctext! report 
html) ...)
  652: 17* [report-renderer #]
In unknown file:
    ?: 18  (letrec ((opt-value #)) (let* (# # # ...) (set! html #) ...))
In 
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/report/taxinvoice.scm:
  215: 19  (let* (# # # ...) (set! html #) ...)
  217: 20* [find-file "taxinvoice.eguile.scm"]
In 
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/report/eguile-utilities.scm:
   85: 21  (let* (# # #) (set! home #) (let # #))
   85: 22* (sub-vicinity (user-vicinity) ".gnucash")
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/report/eguile-utilities.scm:85:19: 
In expression (sub-vicinity (user-vicinity) ".gnucash"):
/usr/local/gnucash-svn-feb10/share/gnucash/guile-modules/gnucash/report/eguile-utilities.scm:85:19: 
Unbound variable: sub-vicinity

-- 
Chris Dennis                                  cgdennis at btinternet.com
Fordingbridge, Hampshire, UK