second arg to mkdir is MODE, not MASK

[perl5.git] / ext / SDBM_File / SDBM_File.xs

diff --git a/ext/SDBM_File/SDBM_File.xs b/ext/SDBM_File/SDBM_File.xs
index 434784a..0df2855 100644 (file)
--- a/ext/SDBM_File/SDBM_File.xs
+++ b/ext/SDBM_File/SDBM_File.xs
@@ -29,6 +29,8 @@ typedef datum datum_value ;
 
 MODULE = SDBM_File     PACKAGE = SDBM_File     PREFIX = sdbm_
 
+PROTOTYPES: DISABLE
+
 SDBM_File
 sdbm_TIEHASH(dbtype, filename, flags, mode, pagname=NULL)
        char *          dbtype