diff --git a/src/engine/engine-helpers.c b/src/engine/engine-helpers.c index 93f03b51f8..4c9b634a6e 100644 --- a/src/engine/engine-helpers.c +++ b/src/engine/engine-helpers.c @@ -140,15 +140,18 @@ GncGUID gnc_scm2guid(SCM guid_scm) { GncGUID guid; - const gchar * str; + gchar * str; if (!scm_is_string(guid_scm) || (GUID_ENCODING_LENGTH != scm_c_string_length (guid_scm))) { return *guid_null(); } + scm_dynwind_begin (0); str = scm_to_locale_string (guid_scm); string_to_guid(str, &guid); + scm_dynwind_free (str); + scm_dynwind_end (); return guid; }