Change 18569 by rgs@rgs-home on 2003/01/22 21:00:59
Fix [perl #19860] by adding a POSIX::fsync() stub.
Affected files ...
... //depot/perl/ext/POSIX/POSIX.pm#31 edit
... //depot/perl/ext/POSIX/POSIX.pod#32 edit
Differences ...
==== //depot/perl/ext/POSIX/POSIX.pm#31 (text) ====
Index: perl/ext/POSIX/POSIX.pm
--- perl/ext/POSIX/POSIX.pm#30~17839~ Wed Sep 4 06:47:12 2002
+++ perl/ext/POSIX/POSIX.pm Wed Jan 22 13:00:59 2003
@@ -282,6 +282,10 @@
redef "IO::Seekable::seek()";
}
+sub fsync {
+ redef "IO::Handle::sync()";
+}
+
sub ferror {
redef "IO::Handle::error()";
}
@@ -878,7 +882,7 @@
_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)],
==== //depot/perl/ext/POSIX/POSIX.pod#32 (text) ====
Index: perl/ext/POSIX/POSIX.pod
--- perl/ext/POSIX/POSIX.pod#31~18299~ Thu Dec 12 12:35:29 2002
+++ perl/ext/POSIX/POSIX.pod Wed Jan 22 13:00:59 2003
@@ -465,6 +465,10 @@
$fd = POSIX::open( "foo", &POSIX::O_RDONLY );
@stats = POSIX::fstat( $fd );
+=item fsync
+
+Use method C<IO::Handle::sync()> instead.
+
=item ftell
Use method C<IO::Seekable::tell()> instead, or see L<perlfunc/tell>.
End of Patch.
