Change 18575 by jhi@kosh on 2003/01/23 12:33:38
Integrate:
[ 18569]
Fix [perl #19860] by adding a POSIX::fsync() stub.
Affected files ...
... //depot/maint-5.8/perl/ext/POSIX/POSIX.pm#3 integrate
... //depot/maint-5.8/perl/ext/POSIX/POSIX.pod#5 integrate
Differences ...
==== //depot/maint-5.8/perl/ext/POSIX/POSIX.pm#3 (text) ====
Index: perl/ext/POSIX/POSIX.pm
--- perl/ext/POSIX/POSIX.pm#2~18080~ Sun Nov 3 21:23:04 2002
+++ perl/ext/POSIX/POSIX.pm Thu Jan 23 04:33:38 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/maint-5.8/perl/ext/POSIX/POSIX.pod#5 (text) ====
Index: perl/ext/POSIX/POSIX.pod
--- perl/ext/POSIX/POSIX.pod#4~18297~ Thu Dec 12 11:19:56 2002
+++ perl/ext/POSIX/POSIX.pod Thu Jan 23 04:33:38 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.
