Skip Menu |
 

This queue is for tickets about the File-Slurp CPAN distribution.

Report information
The Basics
Id: 36450
Status: resolved
Priority: 0/
Queue: File-Slurp

People
Owner: Nobody in particular
Requestors: DSTERLING [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: (no value)
Fixed in: (no value)



Subject: File::Slurp doesn't check the return value of rename call
Download (untitled) / with headers
text/plain 245b
Code has: rename( $file_name, $orig_file_name ) if $args->{'atomic'} ; Should be more like: if ($args->{'atomic'} and not rename( $file_name, $orig_file_name )) { @_ = ( $args, "write_file '$file_name' - rename: $!"); goto &_error ; }
fixed and tested in t/error.t


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.