mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
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:
parent
0cb7f80a35
commit
19f65b1b00
@ -143,8 +143,8 @@ static const char* gnc_scheme_remaining_var = "gnc:*command-line-remaining*";
|
|||||||
static char**
|
static char**
|
||||||
gnc_get_remaining_argv(int prelen, const char **prependargv)
|
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);
|
return gnc_scheme_list_to_nulltermcharpp (prelen, prependargv, rem);
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
@ -365,7 +365,7 @@ gnc_ui_show_main_window(void)
|
|||||||
{
|
{
|
||||||
SCM run_danglers = gh_eval_str("gnc:hook-run-danglers");
|
SCM run_danglers = gh_eval_str("gnc:hook-run-danglers");
|
||||||
SCM hook = gh_eval_str("gnc:*main-window-opened-hook*");
|
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);
|
gh_call2(run_danglers, hook, window);
|
||||||
}
|
}
|
||||||
return 0;
|
return 0;
|
||||||
|
Loading…
Reference in New Issue
Block a user