projects
/
catagits/HTTP-Body.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
f216f0e
)
woremacx's file upload tempdir patch, applied to HTTP::Body
Yuval Kogman [Thu, 30 Mar 2006 13:06:33 +0000 (13:06 +0000)]
lib/HTTP/Body/Parser/MultiPart.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/HTTP/Body/Parser/MultiPart.pm
b/lib/HTTP/Body/Parser/MultiPart.pm
index
cce6585
..
9f55747
100644
(file)
--- a/
lib/HTTP/Body/Parser/MultiPart.pm
+++ b/
lib/HTTP/Body/Parser/MultiPart.pm
@@
-205,7
+205,9
@@
sub handler {
if ($filename) {
- my $fh = File::Temp->new( UNLINK => 0 );
+ my $fh = File::Temp->new( UNLINK => 0,
+ (defined $self->{tmpdir} ? ( DIR => $self->{tmpdir} ) : ())
+ );
$part->{fh} = $fh;
$part->{tempname} = $fh->filename;