X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Ffile-system.cpp;h=5b872a5d1fbb5ffc9085c1ede2d25911c6544920;hp=76892ef7a74ac78a86113ff06659b36b5b996b2d;hb=98052b04792129db97286fdd77ef3b0de8912286;hpb=661f003f90a2ab35026cf17215f28dcb73f54084

diff --git a/src/file-system.cpp b/src/file-system.cpp
index 76892ef..5b872a5 100644
--- a/src/file-system.cpp
+++ b/src/file-system.cpp
@@ -30,13 +30,13 @@ using namespace irr;
 
 
 SCM
-io_IFileSystem_addFileArchive (SCM file_system,
-                               SCM filename,
-                               SCM ignore_case,
-                               SCM ignore_paths,
-                               SCM archive_type,
-                               SCM password,
-                               SCM ret_archive)
+IFileSystem_addFileArchive (SCM file_system,
+                            SCM filename,
+                            SCM ignore_case,
+                            SCM ignore_paths,
+                            SCM archive_type,
+                            SCM password,
+                            SCM ret_archive)
 {
   io::IFileArchive* retArchive = (io::IFileArchive*)scm_to_pointer (ret_archive);
   io::IFileArchive** retArchiveReference = 0;
@@ -61,7 +61,7 @@ extern "C" {
   void
   init_file_system (void)
   {
-    DEFINE_GSUBR ("io_IFileSystem_addFileArchive", 7, 0, 0, io_IFileSystem_addFileArchive);
+    DEFINE_GSUBR ("IFileSystem_addFileArchive", 7, 0, 0, IFileSystem_addFileArchive);
   }
 
 }