X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=perl%2Ftypemap;h=97788d303412c4df659facf711ab8cfdd88d51ee;hp=421e73a263f8b3b02d3426decfb40990e0fc2a7d;hb=005c82b8b89c50f9fb606ce3f5855a0c9b7b1c23;hpb=1ee6da96efe8340a7d3904a865d80cd59d9d3fde

diff --git a/perl/typemap b/perl/typemap
index 421e73a..97788d3 100644
--- a/perl/typemap
+++ b/perl/typemap
@@ -9,7 +9,7 @@ O_OBJECT_guestfs_h
         $var = ($type) SvIV ((SV *) SvRV ($arg));
     else {
         warn (\"${Package}::$func_name(): $var is not a blessed SV reference\");
-	XSRETURN_UNDEF;
+        XSRETURN_UNDEF;
     }
 
 OUTPUT