Erase splash before starting new user dialog.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7270 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
David Hampton
2002-10-05 17:11:04 +00:00
parent 70545d9a9e
commit b020b6a186

View File

@@ -572,7 +572,9 @@ string and 'directories' must be a list of strings."
(not (string? (gnc:history-get-last))) (not (string? (gnc:history-get-last)))
(gnc:option-value (gnc:option-value
(gnc:lookup-global-option "__new_user" "first_startup"))) (gnc:lookup-global-option "__new_user" "first_startup")))
(gnc:new-user-dialog) (begin
(gnc:destroy-splash-screen)
(gnc:new-user-dialog))
(begin (begin
(gnc:load-account-file) (gnc:load-account-file)
(gnc:destroy-splash-screen))) (gnc:destroy-splash-screen)))