Initial port from the deprecated (in 1.6) guile gh_xxx interface to

the supported scm_xxx interface.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@8013 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
David Hampton
2003-02-22 08:15:53 +00:00
parent 5644fe4325
commit d154e92e71
160 changed files with 1797 additions and 1617 deletions

View File

@@ -25,7 +25,7 @@
#include "config.h"
#include <gnome.h>
#include <guile/gh.h>
#include <libguile.h>
#include <popt.h>
#include <stdlib.h>
#include <g-wrap-wct.h>
@@ -419,9 +419,9 @@ gnc_gui_init (SCM command_line)
/* Run the ui startup hooks. */
{
SCM run_danglers = gh_eval_str("gnc:hook-run-danglers");
SCM hook = gh_eval_str("gnc:*ui-startup-hook*");
gh_call1(run_danglers, hook);
SCM run_danglers = scm_c_eval_string("gnc:hook-run-danglers");
SCM hook = scm_c_eval_string("gnc:*ui-startup-hook*");
scm_call_1(run_danglers, hook);
}
}