PaulHowarth/Blog/2012-06-23

Saturday 23rd June 2012

Local Packages

Updated perl-File-Slurp to avoid "Subroutine File::Slurp::O_RDWR redefined" type warnings on old Perls, by adding this patch:

--- lib/File/Slurp.pm
+++ lib/File/Slurp.pm
@@ -8,7 +8,7 @@
 use Carp ;
 use Exporter ;
 use Fcntl qw( :DEFAULT ) ;
-use POSIX qw( :fcntl_h ) ;
+use POSIX qw( :fcntl_h !O_CREAT !O_EXCL !O_RDWR ) ;
 use Errno ;
 #use Symbol ;
 
@@ -79,11 +79,6 @@
                        *O_CREAT = sub { 256 };
                        *O_EXCL = sub { 1024 };
                }
-               elsif ( $^O =~ /inux/ ) {
-                       *O_APPEND = sub { 1024 };
-                       *O_CREAT = sub { 64 };
-                       *O_EXCL = sub { 128 };
-               }
                elsif ( $^O =~ /BSD/i ) {
                        *O_APPEND = sub { 8 };
                        *O_CREAT = sub { 512 };

Cleaned up and rebuilt perl-MailTools, perl-MLDBM, perl-Parse-CPAN-Meta, perl-PlRPC, perl-Test-Fatal, perl-Test-Mojibake. perl-Test-Object, perl-Test-Spelling and perl-Text-Hunspell