Fix string literal.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@5657 57a11ea4-9604-0410-9ed3-97b8803252fd
zzzoldfeatures/g2-gog-integ
Dave Peticolas 25 years ago
parent 1cceb39a7f
commit 995e7d7d27

@ -340,8 +340,8 @@ gnc_scm_lookup(const char *module, const char *symbol)
in_guard = gh_eval_str(in_guard_str);
thunk = gh_eval_str(thunk_str);
out_guard = gh_eval_str("(let ((cm (current-module)))
(lambda () (set-current-module cm)))");
out_guard = gh_eval_str("(let ((cm (current-module)))"
" (lambda () (set-current-module cm)))");
result = scm_dynamic_wind(in_guard, thunk, out_guard);

Loading…
Cancel
Save