call remote procs from guile code

[guile-irrlicht.git] / src / cursor-control.cpp

diff --git a/src/cursor-control.cpp b/src/cursor-control.cpp
index 4efe056d14627248c4a2e2a76de6f5e57711fdad..79e31d9806bc5ca246673de2da2fd2262c39340e 100644 (file)
--- a/src/cursor-control.cpp
+++ b/src/cursor-control.cpp
@@ -30,7 +30,7 @@ using namespace irr;
 
 
 SCM
-gui_ICursorControl_getPosition (SCM cursor_control)
+ICursorControl_getPosition (SCM cursor_control)
 {
   return scm_from_position2d_s32
     (((gui::ICursorControl*)scm_to_pointer (cursor_control))->getPosition ());
@@ -38,8 +38,8 @@ gui_ICursorControl_getPosition (SCM cursor_control)
 
 
 SCM
-gui_ICursorControl_setPosition (SCM cursor_control,
-                                SCM position)
+ICursorControl_setPosition (SCM cursor_control,
+                            SCM position)
 {
   ((gui::ICursorControl*)scm_to_pointer (cursor_control))->
     setPosition (scm_to_position2d_s32 (position));
@@ -52,10 +52,8 @@ extern "C" {
   void
   init_cursor_control (void)
   {
-    DEFINE_GSUBR ("gui_ICursorControl_getPosition", 1, 0, 0,
-                  gui_ICursorControl_getPosition);
-    DEFINE_GSUBR ("gui_ICursorControl_setPosition", 2, 0, 0,
-                  gui_ICursorControl_setPosition);
+    DEFINE_GSUBR ("ICursorControl_getPosition", 1, 0, 0, ICursorControl_getPosition);
+    DEFINE_GSUBR ("ICursorControl_setPosition", 2, 0, 0, ICursorControl_setPosition);
   }
 
 }