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,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;
|
||||
|
Loading…
Reference in New Issue
Block a user