mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
fix bug in gnc:find-localized-file
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6372 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
5e5d981a21
commit
ccbdc243b9
@ -313,9 +313,9 @@ string and 'directories' must be a list of strings."
|
||||
(if (null? dirs)
|
||||
#f
|
||||
(or (gnc:find-file file (map (lambda (prefix)
|
||||
(build-path (list (car dirs) prefix)))
|
||||
(build-path (car dirs) prefix))
|
||||
prefixes))
|
||||
(gnc:find-file file (car dirs))
|
||||
(gnc:find-file file (list (car dirs)))
|
||||
(loop prefixes (cdr dirs))))))
|
||||
|
||||
(define (gnc:print-unstable-message)
|
||||
|
Loading…
Reference in New Issue
Block a user