free strings previously allocated for conversions

[guile-irrlicht.git] / src / gui-listbox.cpp

diff --git a/src/gui-listbox.cpp b/src/gui-listbox.cpp
index b7232501843a2080c08f7ee2d834eba03cfb53ea..a839690c1034711cd93910f74c733514bdbaff3f 100644 (file)
--- a/src/gui-listbox.cpp
+++ b/src/gui-listbox.cpp
@@ -23,7 +23,6 @@
 #include <libguile.h>
 #include "gui-listbox.h"
 #include "gsubr.h"
-#include "wchar.h"
 #include "wrapped.h"
 
 using namespace irr;
@@ -34,16 +33,18 @@ IGUIListBox_addItem (SCM gui_listbox,
                      SCM icon)
 {
   gui::IGUIListBox* listbox = (gui::IGUIListBox*)scm_to_irr_pointer (gui_listbox);
+  wchar_t* wtext = (wchar_t*) scm_to_utf32_string (text);
   u32 item_id;
   if (icon == SCM_UNDEFINED)
     {
-      item_id = listbox->addItem (scm_to_wide_char_string (text));
+      item_id = listbox->addItem (wtext);
     }
   else
     {
-      item_id = listbox->addItem (scm_to_wide_char_string (text),
+      item_id = listbox->addItem (wtext,
                                   scm_to_int32 (icon));
     }
+  free (wtext);
   return scm_from_uint32 (item_id);
 }