Replace gh_lookup with gh_eval_str.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@3629 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas 2001-02-09 22:01:41 +00:00
parent 0cb7f80a35
commit 19f65b1b00

View File

@ -143,7 +143,7 @@ static const char* gnc_scheme_remaining_var = "gnc:*command-line-remaining*";
static char**
gnc_get_remaining_argv(int prelen, const char **prependargv)
{
SCM rem = gh_lookup(gnc_scheme_remaining_var);
SCM rem = gh_eval_str (gnc_scheme_remaining_var);
return gnc_scheme_list_to_nulltermcharpp (prelen, prependargv, rem);
}
@ -365,7 +365,7 @@ gnc_ui_show_main_window(void)
{
SCM run_danglers = gh_eval_str("gnc:hook-run-danglers");
SCM hook = gh_eval_str("gnc:*main-window-opened-hook*");
SCM window = gw_wcp_assimilate_ptr(app, gh_lookup("<gnc:UIWidget>"));
SCM window = gw_wcp_assimilate_ptr(app, gh_eval_str("<gnc:UIWidget>"));
gh_call2(run_danglers, hook, window);
}
return 0;