Update CPANPLUS::Dist::Build to CPAN version 0.32

[p5sagit/p5-mst-13.2.git] / ext / ODBM_File / ODBM_File.xs

diff --git a/ext/ODBM_File/ODBM_File.xs b/ext/ODBM_File/ODBM_File.xs
index fb3b574..2510d5e 100644 (file)
--- a/ext/ODBM_File/ODBM_File.xs
+++ b/ext/ODBM_File/ODBM_File.xs
@@ -15,7 +15,7 @@ int   dbminit(char* filename);
 int    dbmclose(void);
 datum  fetch(datum key);
 int    store(datum key, datum dat);
-int    delete(datum key);
+int    delete(datum key); 
 datum  firstkey(void);
 datum  nextkey(datum key);
 #endif
@@ -32,7 +32,7 @@ datum nextkey(datum key);
  * Set DBM_BUG_DUPLICATE_FREE in the extension hint file.
  */
 /* Close the previous dbm, and fail to open a new dbm */
-#define dbmclose()     ((void) dbminit("/tmp/x/y/z/z/y"))
+#define dbmclose()     ((void) dbminit("/non/exist/ent"))
 #endif
 
 #include <fcntl.h>
@@ -92,7 +92,7 @@ odbm_TIEHASH(dbtype, filename, flags, mode)
 
            if (dbmrefcnt++)
                croak("Old dbm can only open one database");
-           New(0, tmpbuf, strlen(filename) + 5, char);
+           Newx(tmpbuf, strlen(filename) + 5, char);
            SAVEFREEPV(tmpbuf);
            sprintf(tmpbuf,"%s.dir",filename);
            if (stat(tmpbuf, &PL_statbuf) < 0) {