You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@hyperreal.org on 1999/06/08 08:30:53 UTC
cvs commit: modperl/File File.pm
dougm 99/06/07 23:30:53
Modified: . Changes
File File.pm
Log:
change Apache::File->tmpfile flags from O_WRONLY to O_RDWR
Revision Changes Path
1.305 +3 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /export/home/cvs/modperl/Changes,v
retrieving revision 1.304
retrieving revision 1.305
diff -u -r1.304 -r1.305
--- Changes 1999/06/08 04:50:08 1.304
+++ Changes 1999/06/08 06:30:51 1.305
@@ -8,6 +8,9 @@
=item 1.19_01-dev
+change Apache::File->tmpfile flags from O_WRONLY to O_RDWR
+[Chuck O'Donnell <ca...@milf18.bus.net>]
+
fix Apache::RegistryBB when $r->filename NOT_FOUND
[Frank D. Cringle <fd...@cliwe.ping.de>]
1.5 +1 -1 modperl/File/File.pm
Index: File.pm
===================================================================
RCS file: /export/home/cvs/modperl/File/File.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- File.pm 1999/02/01 05:38:58 1.4
+++ File.pm 1999/06/08 06:30:53 1.5
@@ -13,7 +13,7 @@
my $TMPNAM = 'aaaaaa';
my $TMPDIR = $ENV{'TMPDIR'} || $ENV{'TEMP'} || '/tmp';
($TMPDIR) = $TMPDIR =~ /^([^<>|;*]+)$/; #untaint
-my $Mode = Fcntl::O_WRONLY()|Fcntl::O_EXCL()|Fcntl::O_CREAT();
+my $Mode = Fcntl::O_RDWR()|Fcntl::O_EXCL()|Fcntl::O_CREAT();
my $Perms = 0600;
sub tmpfile {