add-static-text!

[guile-irrlicht.git] / src / IrrlichtDevice.cpp

diff --git a/src/IrrlichtDevice.cpp b/src/IrrlichtDevice.cpp
index 026df21fa8c889118db96aee51462d323c07fb43..82b729d040e5f2f580f2d2c47ef7808808a0648f 100644 (file)
--- a/src/IrrlichtDevice.cpp
+++ b/src/IrrlichtDevice.cpp
@@ -21,7 +21,6 @@
 
 #include <irrlicht/irrlicht.h>
 #include <libguile.h>
-#include <wchar.h>
 
 #include "dimension2d.h"
 #include "EDriverTypes.h"
@@ -95,14 +94,7 @@ extern "C" {
                         SCM text)
   {
     irr::IrrlichtDevice* device = unwrap_device (device_obj);
-    char* ctext;
-    wchar_t* wtext;
-
-    ctext = scm_to_utf8_stringn (text, NULL);
-    wtext = (wchar_t*)malloc ((strlen (ctext) + 1) * sizeof (wchar_t));
-    mbstowcs (wtext, ctext, strlen (ctext) + 1);
-
-    device->setWindowCaption (wtext);
+    device->setWindowCaption (scm_to_wide_char_string (text));
     return SCM_UNSPECIFIED;
   }