diff options
| author | Peter Prymmer <PPrymmer@factset.com> | 2001-04-25 09:18:44 -0700 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-25 22:28:28 +0000 |
| commit | 9d1ef5124ae4c80c934a800f6bec01350db2b113 (patch) | |
| tree | 204c1b8b00b9cf8770b3a65d5dc4618bb4a4b0d6 /ext/Cwd | |
| parent | b4f14daa50ff79e763b90c905e323462060c08d7 (diff) | |
| download | perl-9d1ef5124ae4c80c934a800f6bec01350db2b113.tar.gz | |
fix a typo for Cwd.xs
Message-ID: <Pine.OSF.4.10.10104251614200.257877-100000@aspara.forte.com>
p4raw-id: //depot/perl@9843
Diffstat (limited to 'ext/Cwd')
| -rw-r--r-- | ext/Cwd/Cwd.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Cwd/Cwd.xs b/ext/Cwd/Cwd.xs index b21b494f75..66bf47c271 100644 --- a/ext/Cwd/Cwd.xs +++ b/ext/Cwd/Cwd.xs @@ -205,7 +205,7 @@ _cwdxs_abs_path(char *start) Move(cwd, cwd + namelen + 1, strlen(cwd), char); Copy(dp->d_name, cwd + 1, namelen, char); #ifdef VOID_CLOSEDIR - PerlDir_close(dir); + PerlDir_close(parent); #else if (PerlDir_close(parent) < 0) { warn("abs_path: closedir(\"%s\"): %s", dotdots, Strerror(errno)); |