Hello community,
here is the log from the commit of package perl-Log-Dispatch-FileRotate for
openSUSE:Factory checked in at 2018-08-31 10:42:46
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Log-Dispatch-FileRotate (Old)
and /work/SRC/openSUSE:Factory/.perl-Log-Dispatch-FileRotate.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Log-Dispatch-FileRotate"
Fri Aug 31 10:42:46 2018 rev:27 rq:631297 version:1.36
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Log-Dispatch-FileRotate/perl-Log-Dispatch-FileRotate.changes
2018-03-14 19:38:07.687140947 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Log-Dispatch-FileRotate.new/perl-Log-Dispatch-FileRotate.changes
2018-08-31 10:43:51.759160872 +0200
@@ -1,0 +2,10 @@
+Mon Jul 30 05:32:22 UTC 2018 - [email protected]
+
+- updated to 1.36
+ see /usr/share/doc/packages/perl-Log-Dispatch-FileRotate/Changes
+
+ 1.36 Sun 24 29 2018
+ - If the "permissions" param is set, use the same permissions for the
lock
+ file that the log file will use. [github #21]
+
+-------------------------------------------------------------------
Old:
----
Log-Dispatch-FileRotate-1.35.tar.gz
New:
----
Log-Dispatch-FileRotate-1.36.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Log-Dispatch-FileRotate.spec ++++++
--- /var/tmp/diff_new_pack.PhzTD5/_old 2018-08-31 10:43:52.379161609 +0200
+++ /var/tmp/diff_new_pack.PhzTD5/_new 2018-08-31 10:43:52.379161609 +0200
@@ -17,7 +17,7 @@
Name: perl-Log-Dispatch-FileRotate
-Version: 1.35
+Version: 1.36
Release: 0
%define cpan_name Log-Dispatch-FileRotate
Summary: Log to Files that Archive/Rotate Themselves
++++++ Log-Dispatch-FileRotate-1.35.tar.gz ->
Log-Dispatch-FileRotate-1.36.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/Changes
new/Log-Dispatch-FileRotate-1.36/Changes
--- old/Log-Dispatch-FileRotate-1.35/Changes 2018-03-07 16:43:20.000000000
+0100
+++ new/Log-Dispatch-FileRotate-1.36/Changes 2018-07-29 21:24:44.000000000
+0200
@@ -1,5 +1,9 @@
Revision history for Perl extension Log::Dispatch::FileRotate.
+1.36 Sun 24 29 2018
+ - If the "permissions" param is set, use the same permissions for the lock
+ file that the log file will use. [github #21]
+
1.35 Wed 43 07 2018
- Fix lockfile race condition test in Strawberry Perl (Thanks Zak B. Elep)
- Skip file open failure test on Cygwin - chmod bahaviour varies on Cygwin
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/MANIFEST
new/Log-Dispatch-FileRotate-1.36/MANIFEST
--- old/Log-Dispatch-FileRotate-1.35/MANIFEST 2018-03-07 16:43:20.000000000
+0100
+++ new/Log-Dispatch-FileRotate-1.36/MANIFEST 2018-07-29 21:24:44.000000000
+0200
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.010.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.012.
Changes
LICENSE
MANIFEST
@@ -18,6 +18,7 @@
t/basic.t
t/file-open-failure.t
t/lockfile-open-failure.t
+t/lockfile-permissions.t
t/no-activity-bug.t
t/sig-warn-deadlock.t
t/size-with-underscore.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/META.json
new/Log-Dispatch-FileRotate-1.36/META.json
--- old/Log-Dispatch-FileRotate-1.35/META.json 2018-03-07 16:43:20.000000000
+0100
+++ new/Log-Dispatch-FileRotate-1.36/META.json 2018-07-29 21:24:44.000000000
+0200
@@ -4,7 +4,7 @@
"Michael Schout <[email protected]>"
],
"dynamic_config" : 0,
- "generated_by" : "Dist::Zilla version 6.010, CPAN::Meta::Converter version
2.150010",
+ "generated_by" : "Dist::Zilla version 6.012, CPAN::Meta::Converter version
2.150010",
"license" : [
"perl_5"
],
@@ -31,6 +31,7 @@
},
"runtime" : {
"requires" : {
+ "Carp" : "0",
"Date::Manip" : "0",
"Exporter" : "0",
"Fcntl" : "0",
@@ -61,15 +62,15 @@
"provides" : {
"Log::Dispatch::FileRotate" : {
"file" : "lib/Log/Dispatch/FileRotate.pm",
- "version" : "1.35"
+ "version" : "1.36"
},
"Log::Dispatch::FileRotate::Flock" : {
"file" : "lib/Log/Dispatch/FileRotate/Flock.pm",
- "version" : "1.35"
+ "version" : "1.36"
},
"Log::Dispatch::FileRotate::Mutex" : {
"file" : "lib/Log/Dispatch/FileRotate/Mutex.pm",
- "version" : "1.35"
+ "version" : "1.36"
}
},
"release_status" : "stable",
@@ -84,7 +85,8 @@
"web" : "https://github.com/mschout/perl-log-dispatch-filerotate";
}
},
- "version" : "1.35",
- "x_serialization_backend" : "Cpanel::JSON::XS version 3.0233"
+ "version" : "1.36",
+ "x_generated_by_perl" : "v5.26.2",
+ "x_serialization_backend" : "Cpanel::JSON::XS version 4.04"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/META.yml
new/Log-Dispatch-FileRotate-1.36/META.yml
--- old/Log-Dispatch-FileRotate-1.35/META.yml 2018-03-07 16:43:20.000000000
+0100
+++ new/Log-Dispatch-FileRotate-1.36/META.yml 2018-07-29 21:24:44.000000000
+0200
@@ -16,7 +16,7 @@
ExtUtils::MakeMaker: '0'
perl: '5.006'
dynamic_config: 0
-generated_by: 'Dist::Zilla version 6.010, CPAN::Meta::Converter version
2.150010'
+generated_by: 'Dist::Zilla version 6.012, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -25,14 +25,15 @@
provides:
Log::Dispatch::FileRotate:
file: lib/Log/Dispatch/FileRotate.pm
- version: '1.35'
+ version: '1.36'
Log::Dispatch::FileRotate::Flock:
file: lib/Log/Dispatch/FileRotate/Flock.pm
- version: '1.35'
+ version: '1.36'
Log::Dispatch::FileRotate::Mutex:
file: lib/Log/Dispatch/FileRotate/Mutex.pm
- version: '1.35'
+ version: '1.36'
requires:
+ Carp: '0'
Date::Manip: '0'
Exporter: '0'
Fcntl: '0'
@@ -48,5 +49,6 @@
bugtracker: https://github.com/mschout/perl-log-dispatch-filerotate/issues
homepage: https://github.com/mschout/perl-log-dispatch-filerotate
repository: https://github.com/mschout/perl-log-dispatch-filerotate.git
-version: '1.35'
-x_serialization_backend: 'YAML::Tiny version 1.70'
+version: '1.36'
+x_generated_by_perl: v5.26.2
+x_serialization_backend: 'YAML::Tiny version 1.73'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/Makefile.PL
new/Log-Dispatch-FileRotate-1.36/Makefile.PL
--- old/Log-Dispatch-FileRotate-1.35/Makefile.PL 2018-03-07
16:43:20.000000000 +0100
+++ new/Log-Dispatch-FileRotate-1.36/Makefile.PL 2018-07-29
21:24:44.000000000 +0200
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.010.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.012.
use strict;
use warnings;
@@ -17,6 +17,7 @@
"MIN_PERL_VERSION" => "5.008",
"NAME" => "Log::Dispatch::FileRotate",
"PREREQ_PM" => {
+ "Carp" => 0,
"Date::Manip" => 0,
"Exporter" => 0,
"Fcntl" => 0,
@@ -38,7 +39,7 @@
"Test::Warn" => 0,
"utf8" => 0
},
- "VERSION" => "1.35",
+ "VERSION" => "1.36",
"test" => {
"TESTS" => "t/*.t"
}
@@ -46,6 +47,7 @@
my %FallbackPrereqs = (
+ "Carp" => 0,
"Date::Manip" => 0,
"Encode" => 0,
"Exporter" => 0,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/README
new/Log-Dispatch-FileRotate-1.36/README
--- old/Log-Dispatch-FileRotate-1.35/README 2018-03-07 16:43:20.000000000
+0100
+++ new/Log-Dispatch-FileRotate-1.36/README 2018-07-29 21:24:44.000000000
+0200
@@ -1,7 +1,5 @@
-
-
This archive contains the distribution Log-Dispatch-FileRotate,
-version 1.35:
+version 1.36:
Log to Files that Archive/Rotate Themselves
@@ -11,5 +9,4 @@
the same terms as the Perl 5 programming language system itself.
-This README file was generated by Dist::Zilla::Plugin::Readme v6.010.
-
+This README file was generated by Dist::Zilla::Plugin::Readme v6.012.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Dispatch-FileRotate-1.35/SIGNATURE
new/Log-Dispatch-FileRotate-1.36/SIGNATURE
--- old/Log-Dispatch-FileRotate-1.35/SIGNATURE 2018-03-07 16:43:20.000000000
+0100
+++ new/Log-Dispatch-FileRotate-1.36/SIGNATURE 2018-07-29 21:24:44.000000000
+0200
@@ -14,17 +14,17 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA256
-SHA1 cdf7fba8ff1f3c869c591f9c8c3996af0ecc3ada Changes
+SHA1 e6c8d40466352641bcbe58f3232e641f7b0cd06f Changes
SHA1 bab88f54ea8c7c2588e407bd69fad8bf7cb47c1b LICENSE
-SHA1 4a8c203bb26d5f0f85bde3f70f17b8699eaf80de MANIFEST
+SHA1 282ad62658f3e13a2132d6d69882e3e3cb5cace6 MANIFEST
SHA1 c752e09ba9b675ae4b45d2c73716f7848afed367 MANIFEST.SKIP
-SHA1 34f7aa07c4a4ee5798e4071eef9e63030a8f21bf META.json
-SHA1 9b2cd8db6cc41d5a73a169dd4c511ca43741518b META.yml
-SHA1 a4674c4eb785d34c7d39a7de8da9f256d0ff29e3 Makefile.PL
-SHA1 72ecd7552231723f37db35dbca4b331c97adab09 README
-SHA1 f0cbdb308726036dce2b9af560c401d4aeae2ca6 lib/Log/Dispatch/FileRotate.pm
-SHA1 5bc3993670708b19cbb9911cd7f75d8b4f9c5fb7
lib/Log/Dispatch/FileRotate/Flock.pm
-SHA1 e0e35d94d1884d46eae9635e81a7295b894afe2c
lib/Log/Dispatch/FileRotate/Mutex.pm
+SHA1 c19ffa7ff172aa45f56e8719d736b41e3697fad6 META.json
+SHA1 7215b40efc8bf9ffd64e4e9c8e0526a8f97c57af META.yml
+SHA1 d66c1f677a57b1686e2d96beac3c024b931e8a89 Makefile.PL
+SHA1 969a95f3419292e14c7620cd76bc2844af91d2bc README
+SHA1 c0de854522c5fd520298f278ed9b0cabd42cedcc lib/Log/Dispatch/FileRotate.pm
+SHA1 e3ecb53d0a360e2166339aa3bd4cd310fc864585
lib/Log/Dispatch/FileRotate/Flock.pm
+SHA1 626a12607cac66b3d22186d405b694a7302b3e15
lib/Log/Dispatch/FileRotate/Mutex.pm
SHA1 1b96fc5899c6b1cfb809c9b285e4b54ba0af7ba4 t/00-compile.t
SHA1 df7f66f7d541240ca93c857a4141a3fcbdcd168e
t/author-lockfile-race-condition.t
SHA1 8efad25309730a4d501fb40fc03eda4697303372 t/author-pod-syntax.t
@@ -32,23 +32,24 @@
SHA1 0e260151375307dbd52a720d92c0420351202914 t/basic.t
SHA1 5c49325ec5e88b5b2fa4a62b3168d6e2b4ac0946 t/file-open-failure.t
SHA1 c41015ddd96ccd55280128c9a062e0885956dbfa t/lockfile-open-failure.t
+SHA1 62741f7b411bffea6f8d9cb6e2175293f714bef0 t/lockfile-permissions.t
SHA1 bf6691953ae08b994913244e559bb8cbb59a1fc5 t/no-activity-bug.t
SHA1 8c6299f93ea1882d10d2b502207a04920ecd1f1b t/sig-warn-deadlock.t
SHA1 795ff4c3ebb7dcc9bf59a2de7b2c84726e1ae249 t/size-with-underscore.t
-----BEGIN PGP SIGNATURE-----
-iQJFBAEBCAAvFiEE2EtuRfhGgngE8PsARAzvLrlUzY4FAlqgCJgRHG1zY2hvdXRA
-Y3Bhbi5vcmcACgkQRAzvLrlUzY6yKQ//Yk3zxO/Bvi/vjq5TrHqTG/oo6t9WGYoX
-af+MscoG+hJXtTNsHYcai31EDJr+W+TeOstDGj2iY4Xu8PjhfOJ7xaZTtsz9Y1nQ
-fJF+QVaSy95CLkP1yOWKIrT9/XJfcFmeCTPoBjs2+kCs97YICMoPxBkuziFZiZOs
-lBk7r+G7Px3wlq2oczkuKoKLGWW6qnGqRBCBW5gJCuVpQ9/caJ3NGjB0FvbBQ9iR
-iqp0MiiYuFawzjLRZWAjKGLX/Gzh1+7UdFDyDdjAATgWdTJQWh6XsZk/bHF+G3Yv
-PwEQyqTzizDtjC8pduE5GvzaiD2gfa9ndUjN7PD1uzo0qgx5bxv9AUEr50/Pm4P5
-RIS3Oi0ImW1NN9FQtqK+oZO+G36g0VRW4XFx8iPMyngIcYLA0CkVGHKTGD4J2Edi
-R7KU2jRmlrI+yiTkGikfn37wUTuJBeE3IGDSfp/CrlJY1+LcGYAz+/owlbspLc9e
-KrV5iQ0HB1xfbdaKZqiE4HTvye3SyyBI5/5uxp8HxDYdnEyoD+bRv1d+aTOQJalL
-2c3fbG+I86Ri3Y50u8cYZctXxzM+qBOU1Us47lpAe6JB8XUVh1N5wG/cYIDUODGA
-zaXLxpJVtBcysDDXQ6nX3R/PbSFla1+58Sk1nJ6OipQuj/X+qQ9nVu7+7ajUcJjv
-DPDmrlJR+Yw=
-=mz5R
+iQJFBAEBCAAvFiEE2EtuRfhGgngE8PsARAzvLrlUzY4FAlteFHYRHG1zY2hvdXRA
+Y3Bhbi5vcmcACgkQRAzvLrlUzY6y9RAAmRGNr0WT1F4c3nXKZNVXRI87w6lC2LrD
+2sIqPjvVx0WBXiYBWXEQSV65W2hlHNHtaPFsRiBUoAUeggHNzBh/QSO6GoH0TIdw
+JtWUupXqmGnpzH2ePPDx/OvUTnZU+EZ5VCf1yX8beVnboqKmRBnSE4R/bBUGRYO2
+T3brQKIVdjL54MHvS4EARuc7zCwHPD+UgIKarg7cQ6+Bp6G2hjTOP0JFcc9CQYDA
+ZNTjbTE5GxjRHn6RX6UWIZuo2MGhDTFbnIGwrZdwTS5loxovM0ZVyvx4o0Z2rZJt
+luKRx7OYAPRD7DwGrwCCpvCAgr4r0bAy79OqhowjAGPNyg4mrxiMP/w58ZxqYn3R
+BamS18HIvSRc7Bo/TOn4iM4t5cuSD59ZI1vlMSDjF17wQlV3whphgUBskr53ckVM
+nZQ6uSspWb6dP0b1Qpzm4KNeScyvF4RRs+JkNJR45u3Nrbi2alwe1tsIECgjfwxF
+rKWa7l29PxWLd7eCJ/eiqCxdlVk6ZtZNkjBQJPK2QR4d5dCmynben2nML9RKjnXS
+VwqOKxsrtMccQCIoQ25d1AFusnERxjGqmsLpkPcO11W9QD6BLunaOTEAFEqXY+Hl
+wD9pO9YO08lFUud/OSS6nWq863x0s8gn17mZ1KhMjtJNYQhhsvCjt5rq1HvgupWw
+r1VAHaVyqAw=
+=ZSxO
-----END PGP SIGNATURE-----
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Dispatch-FileRotate-1.35/lib/Log/Dispatch/FileRotate/Flock.pm
new/Log-Dispatch-FileRotate-1.36/lib/Log/Dispatch/FileRotate/Flock.pm
--- old/Log-Dispatch-FileRotate-1.35/lib/Log/Dispatch/FileRotate/Flock.pm
2018-03-07 16:43:20.000000000 +0100
+++ new/Log-Dispatch-FileRotate-1.36/lib/Log/Dispatch/FileRotate/Flock.pm
2018-07-29 21:24:44.000000000 +0200
@@ -8,7 +8,7 @@
#
package Log::Dispatch::FileRotate::Flock;
-$Log::Dispatch::FileRotate::Flock::VERSION = '1.35';
+$Log::Dispatch::FileRotate::Flock::VERSION = '1.36';
# ABSTRACT: File Locking Functions for L<Log::Dispatch::FileRotate>
use strict;
@@ -93,13 +93,15 @@
=pod
+=encoding UTF-8
+
=head1 NAME
Log::Dispatch::FileRotate::Flock - File Locking Functions for
L<Log::Dispatch::FileRotate>
=head1 VERSION
-version 1.35
+version 1.36
=head1 SYNOPSIS
@@ -125,7 +127,7 @@
=head1 SOURCE
-The development version is on github at
L<http://https://github.com/mschout/perl-log-dispatch-filerotate>
+The development version is on github at
L<https://https://github.com/mschout/perl-log-dispatch-filerotate>
and may be cloned from
L<git://https://github.com/mschout/perl-log-dispatch-filerotate.git>
=head1 BUGS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Dispatch-FileRotate-1.35/lib/Log/Dispatch/FileRotate/Mutex.pm
new/Log-Dispatch-FileRotate-1.36/lib/Log/Dispatch/FileRotate/Mutex.pm
--- old/Log-Dispatch-FileRotate-1.35/lib/Log/Dispatch/FileRotate/Mutex.pm
2018-03-07 16:43:20.000000000 +0100
+++ new/Log-Dispatch-FileRotate-1.36/lib/Log/Dispatch/FileRotate/Mutex.pm
2018-07-29 21:24:44.000000000 +0200
@@ -8,11 +8,12 @@
#
package Log::Dispatch::FileRotate::Mutex;
-$Log::Dispatch::FileRotate::Mutex::VERSION = '1.35';
+$Log::Dispatch::FileRotate::Mutex::VERSION = '1.36';
# ABSTRACT: Flock Based File Mutex.
use strict;
use warnings;
+use Carp 'croak';
use Log::Dispatch::FileRotate::Flock qw(safe_flock flopen);
use Fcntl ':flock';
@@ -39,12 +40,13 @@
sub new {
- my ($class, $path) = @_;
+ my ($class, $path, %args) = @_;
$class = ref $class || $class;
my $self = bless {
- _path => $path
+ _path => $path,
+ %args
}, $class;
return $self;
@@ -60,6 +62,8 @@
# we have not opened the lockfile in this thread.
my ($fh, $inode) = flopen($self->{_path});
+ $self->_set_permissions;
+
unless (defined $fh) {
return 0;
}
@@ -89,11 +93,29 @@
}
}
- # otherwise this $pid is alraedy holding the lock
+ # otherwise this $pid is already holding the lock
return $self->{$pid} || 0;
}
+sub _set_permissions {
+ my $self = shift;
+
+ unless (defined $self->{permissions}) {
+ return;
+ }
+
+ my $file = $self->{_path};
+
+ my $current_mode = (stat $self->{_path})[2] & 07777;
+
+ if ($current_mode ne $self->{permissions}) {
+ chmod $self->{permissions}, $self->{_path}
+ or croak sprintf 'Failed to chmod %s to %04o: %s',
+ $self->{_path}, $self->{permissions} & 07777, $!;
+ }
+}
+
sub unlock {
my $self = shift;
@@ -119,13 +141,15 @@
=pod
+=encoding UTF-8
+
=head1 NAME
Log::Dispatch::FileRotate::Mutex - Flock Based File Mutex.
=head1 VERSION
-version 1.35
+version 1.36
=head1 SYNOPSIS
@@ -157,7 +181,7 @@
=head1 SOURCE
-The development version is on github at
L<http://https://github.com/mschout/perl-log-dispatch-filerotate>
+The development version is on github at
L<https://https://github.com/mschout/perl-log-dispatch-filerotate>
and may be cloned from
L<git://https://github.com/mschout/perl-log-dispatch-filerotate.git>
=head1 BUGS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Dispatch-FileRotate-1.35/lib/Log/Dispatch/FileRotate.pm
new/Log-Dispatch-FileRotate-1.36/lib/Log/Dispatch/FileRotate.pm
--- old/Log-Dispatch-FileRotate-1.35/lib/Log/Dispatch/FileRotate.pm
2018-03-07 16:43:20.000000000 +0100
+++ new/Log-Dispatch-FileRotate-1.36/lib/Log/Dispatch/FileRotate.pm
2018-07-29 21:24:44.000000000 +0200
@@ -1,5 +1,5 @@
package Log::Dispatch::FileRotate;
-$Log::Dispatch::FileRotate::VERSION = '1.35';
+$Log::Dispatch::FileRotate::VERSION = '1.36';
# ABSTRACT: Log to Files that Archive/Rotate Themselves
require 5.005;
@@ -378,7 +378,14 @@
sub mutex_for_path {
my ($self, $path) = @_;
- $MUTEXES{$path} ||= Log::Dispatch::FileRotate::Mutex->new($path);
+ my %args;
+
+ # use same permissions for the Mutex file
+ if (exists $self->{params}{permissions}) {
+ $args{permissions} = $self->{params}{permissions};
+ }
+
+ $MUTEXES{$path} ||= Log::Dispatch::FileRotate::Mutex->new($path,
%args);
}
}
@@ -666,13 +673,15 @@
=pod
+=encoding UTF-8
+
=head1 NAME
Log::Dispatch::FileRotate - Log to Files that Archive/Rotate Themselves
=head1 VERSION
-version 1.35
+version 1.36
=head1 SYNOPSIS
@@ -994,7 +1003,7 @@
=head1 SOURCE
-The development version is on github at
L<http://https://github.com/mschout/perl-log-dispatch-filerotate>
+The development version is on github at
L<https://https://github.com/mschout/perl-log-dispatch-filerotate>
and may be cloned from
L<git://https://github.com/mschout/perl-log-dispatch-filerotate.git>
=head1 BUGS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Dispatch-FileRotate-1.35/t/lockfile-permissions.t
new/Log-Dispatch-FileRotate-1.36/t/lockfile-permissions.t
--- old/Log-Dispatch-FileRotate-1.35/t/lockfile-permissions.t 1970-01-01
01:00:00.000000000 +0100
+++ new/Log-Dispatch-FileRotate-1.36/t/lockfile-permissions.t 2018-07-29
21:24:44.000000000 +0200
@@ -0,0 +1,34 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+use Test::More;
+use Path::Tiny;
+use Log::Dispatch::FileRotate;
+
+for my $mode (0666, 0644, 0600) {
+ my $tempdir = Path::Tiny->tempdir;
+
+ my $dispatcher = Log::Dispatch->new;
+ isa_ok $dispatcher, 'Log::Dispatch';
+
+ my $file_logger = Log::Dispatch::FileRotate->new(
+ filename => $tempdir->child('myerrs.log')->stringify,
+ permissions => 0666,
+ min_level => 'debug',
+ mode => 'append',
+ size => 20000,
+ max => 5,
+ newline => 1,
+ DatePattern => 'YYYY-dd-HH');
+
+ isa_ok $file_logger, 'Log::Dispatch::FileRotate';
+ $dispatcher->add($file_logger);
+
+ $dispatcher->log(level => 'info', message => 'Hello world');
+
+ my $permissions = (stat $file_logger->{lf})[2] & 07777;
+ cmp_ok $permissions, '==', 0666;
+}
+
+done_testing;
