diff options
| author | Jim Cromie <jcromie@cpan.org> | 2005-07-06 08:19:53 -0600 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2005-07-08 16:35:10 +0000 |
| commit | a02a5408b2f199007c4dcb74559cc79066307ada (patch) | |
| tree | b5456b7513dec78b81e08371fbd59138e2edfe72 /ext/ODBM_File | |
| parent | bdf3085f9fca00a6148ef3f26060d442844b64bd (diff) | |
| download | perl-a02a5408b2f199007c4dcb74559cc79066307ada.tar.gz | |
Re: janitorial work ? [patch]
Message-ID: <42CC3CE9.5050606@divsol.com>
(reverted all dual-lived modules since they must work with older
perls too so must wait for a new Devel::PPPort)
p4raw-id: //depot/perl@25101
Diffstat (limited to 'ext/ODBM_File')
| -rw-r--r-- | ext/ODBM_File/ODBM_File.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/ODBM_File/ODBM_File.xs b/ext/ODBM_File/ODBM_File.xs index 95dedfff9d..695d3927c9 100644 --- a/ext/ODBM_File/ODBM_File.xs +++ b/ext/ODBM_File/ODBM_File.xs @@ -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) { |