diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-01-22 21:00:59 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-01-22 21:00:59 +0000 |
| commit | f0709b241ca4633837a71ebb25b49d6477a9b61f (patch) | |
| tree | a445bb84820307fc268b8a3d124b9fe8277e0ba9 /ext/POSIX/POSIX.pm | |
| parent | 0555b2b0658b3543d19d3fed65724628f43e0191 (diff) | |
| download | perl-f0709b241ca4633837a71ebb25b49d6477a9b61f.tar.gz | |
Fix [perl #19860] by adding a POSIX::fsync() stub.
p4raw-id: //depot/perl@18569
Diffstat (limited to 'ext/POSIX/POSIX.pm')
| -rw-r--r-- | ext/POSIX/POSIX.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm index 5a1cbb9392..74a014fb43 100644 --- a/ext/POSIX/POSIX.pm +++ b/ext/POSIX/POSIX.pm @@ -282,6 +282,10 @@ sub fseek { redef "IO::Seekable::seek()"; } +sub fsync { + redef "IO::Handle::sync()"; +} + sub ferror { redef "IO::Handle::error()"; } @@ -878,7 +882,7 @@ sub load_imports { _SC_STREAM_MAX _SC_TZNAME_MAX _SC_VERSION _exit access ctermid cuserid dup2 dup execl execle execlp execv execve execvp - fpathconf getcwd getegid geteuid getgid getgroups + fpathconf fsync getcwd getegid geteuid getgid getgroups getpid getuid isatty lseek pathconf pause setgid setpgid setsid setuid sysconf tcgetpgrp tcsetpgrp ttyname)], |