From b8fc11d28731e13a5aa08863dfc36cc79fda4923 Mon Sep 17 00:00:00 2001
From: Michael Gran <spk121@yahoo.com>
Date: Fri, 25 Sep 2009 07:47:56 -0700
Subject: [PATCH] Missing free in nl-langinfo

This is a regression.

* libguile/i18n.c (scm_nl_langinfo): free c_result
---
 libguile/i18n.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/libguile/i18n.c b/libguile/i18n.c
index b6c84cefb..004db8d5e 100644
--- a/libguile/i18n.c
+++ b/libguile/i18n.c
@@ -1651,6 +1651,7 @@ SCM_DEFINE (scm_nl_langinfo, "nl-langinfo", 1, 1, 0,
              from the c_locale.  */
           result = scm_from_locale_string (c_result);
 #endif /* !HAVE_LANGINFO_CODESET */
+          free (c_result);
 	}
     }