Group :: Development/Perl
RPM: perl-PPerl
Main Changelog Spec Patches Sources Download Gear Bugs and FR Repocop
Patch: PPerl-0.25-alt-umask.patch
Download
Download
Fix for umask() usage in PPerl (rt.cpan.org, #7609)
--- ./pperl.h.header
+++ ./pperl.h.header
@@ -188,7 +188,7 @@ sub become_daemon {
open(STDOUT,">/dev/null");
open(STDERR, '>&STDOUT');
chdir '/'; # change working directory
- umask(0); # forget file mode creation mask
+# umask(0); # forget file mode creation mask
$ENV{PATH} = '/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin';
delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
$SIG{CHLD} = \&reap_child;