Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Log-Dispatchouli for openSUSE:Factory checked in at 2025-07-22 12:20:09 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Log-Dispatchouli (Old) and /work/SRC/openSUSE:Factory/.perl-Log-Dispatchouli.new.8875 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Log-Dispatchouli" Tue Jul 22 12:20:09 2025 rev:24 rq:1294878 version:3.10.0 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Log-Dispatchouli/perl-Log-Dispatchouli.changes 2025-01-14 16:23:46.192794272 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Log-Dispatchouli.new.8875/perl-Log-Dispatchouli.changes 2025-07-22 12:20:13.519947384 +0200 @@ -1,0 +2,10 @@ +Thu Jul 17 05:40:14 UTC 2025 - Tina Müller <timueller+p...@suse.de> + +- updated to 3.10.0 (3.010) + see /usr/share/doc/packages/perl-Log-Dispatchouli/Changes + + 3.010 2025-07-16 09:04:21-04:00 America/New_York + - add flog_messages and fmt_event, which return formatted strings + without logging them + +------------------------------------------------------------------- Old: ---- Log-Dispatchouli-3.009.tar.gz New: ---- Log-Dispatchouli-3.010.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Log-Dispatchouli.spec ++++++ --- /var/tmp/diff_new_pack.8wWtb3/_old 2025-07-22 12:20:15.084012636 +0200 +++ /var/tmp/diff_new_pack.8wWtb3/_new 2025-07-22 12:20:15.104013470 +0200 @@ -18,10 +18,10 @@ %define cpan_name Log-Dispatchouli Name: perl-Log-Dispatchouli -Version: 3.9.0 +Version: 3.10.0 Release: 0 -# 3.009 -> normalize -> 3.9.0 -%define cpan_version 3.009 +# 3.010 -> normalize -> 3.10.0 +%define cpan_version 3.010 License: Artistic-1.0 OR GPL-1.0-or-later Summary: Simple wrapper around Log::Dispatch URL: https://metacpan.org/release/%{cpan_name} @@ -40,12 +40,12 @@ BuildRequires: perl(Params::Util) BuildRequires: perl(String::Flogger) BuildRequires: perl(Sub::Exporter) -BuildRequires: perl(Sub::Exporter::GlobExporter) >= 0.002 +BuildRequires: perl(Sub::Exporter::GlobExporter) >= 0.2 BuildRequires: perl(Sys::Syslog) >= 0.16 BuildRequires: perl(Test::Deep) BuildRequires: perl(Test::Fatal) BuildRequires: perl(Test::More) >= 0.96 -BuildRequires: perl(Try::Tiny) >= 0.04 +BuildRequires: perl(Try::Tiny) >= 0.40 BuildRequires: perl(experimental) Requires: perl(Log::Dispatch) Requires: perl(Log::Dispatch::Array) @@ -55,9 +55,9 @@ Requires: perl(Params::Util) Requires: perl(String::Flogger) Requires: perl(Sub::Exporter) -Requires: perl(Sub::Exporter::GlobExporter) >= 0.002 +Requires: perl(Sub::Exporter::GlobExporter) >= 0.2 Requires: perl(Sys::Syslog) >= 0.16 -Requires: perl(Try::Tiny) >= 0.04 +Requires: perl(Try::Tiny) >= 0.40 Requires: perl(experimental) Provides: perl(Log::Dispatchouli) = %{version} Provides: perl(Log::Dispatchouli::Global) = %{version} @@ -85,7 +85,7 @@ String::Flogger docs. %prep -%autosetup -n %{cpan_name}-%{cpan_version} +%autosetup -n %{cpan_name}-%{cpan_version} -p1 %build perl Makefile.PL INSTALLDIRS=vendor ++++++ Log-Dispatchouli-3.009.tar.gz -> Log-Dispatchouli-3.010.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/Changes new/Log-Dispatchouli-3.010/Changes --- old/Log-Dispatchouli-3.009/Changes 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/Changes 2025-07-16 15:04:23.000000000 +0200 @@ -1,5 +1,9 @@ Revision history for Log-Dispatchouli +3.010 2025-07-16 09:04:21-04:00 America/New_York + - add flog_messages and fmt_event, which return formatted strings + without logging them + 3.009 2025-01-07 21:22:25-05:00 America/New_York - added documentation of the enable_stdout and enable_stderr methods, added in 2.018 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/MANIFEST new/Log-Dispatchouli-3.010/MANIFEST --- old/Log-Dispatchouli-3.009/MANIFEST 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/MANIFEST 2025-07-16 15:04:23.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.032. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.033. Changes LICENSE MANIFEST diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/META.json new/Log-Dispatchouli-3.010/META.json --- old/Log-Dispatchouli-3.009/META.json 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/META.json 2025-07-16 15:04:23.000000000 +0200 @@ -4,7 +4,7 @@ "Ricardo SIGNES <cpan@semiotic.systems>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 6.032, CPAN::Meta::Converter version 2.150010", + "generated_by" : "Dist::Zilla version 6.033, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], @@ -80,10 +80,10 @@ "web" : "https://github.com/rjbs/Log-Dispatchouli" } }, - "version" : "3.009", + "version" : "3.010", "x_Dist_Zilla" : { "perl" : { - "version" : "5.038000" + "version" : "5.040001" }, "plugins" : [ { @@ -151,57 +151,57 @@ { "class" : "Dist::Zilla::Plugin::PruneCruft", "name" : "@RJBS/@Filter/PruneCruft", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::ManifestSkip", "name" : "@RJBS/@Filter/ManifestSkip", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::MetaYAML", "name" : "@RJBS/@Filter/MetaYAML", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::License", "name" : "@RJBS/@Filter/License", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::Readme", "name" : "@RJBS/@Filter/Readme", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::ExecDir", "name" : "@RJBS/@Filter/ExecDir", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::ShareDir", "name" : "@RJBS/@Filter/ShareDir", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::Manifest", "name" : "@RJBS/@Filter/Manifest", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::TestRelease", "name" : "@RJBS/@Filter/TestRelease", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::ConfirmRelease", "name" : "@RJBS/@Filter/ConfirmRelease", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::UploadToCPAN", "name" : "@RJBS/@Filter/UploadToCPAN", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::MakeMaker", @@ -211,12 +211,12 @@ } }, "name" : "@RJBS/MakeMaker", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::AutoPrereqs", "name" : "@RJBS/AutoPrereqs", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::Git::NextVersion", @@ -227,7 +227,7 @@ "version_regexp" : "(?^:^([0-9]+\\.[0-9]+)$)" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.45.2", + "git_version" : "2.39.5 (Apple Git-154)", "repo_root" : "." } }, @@ -237,22 +237,22 @@ { "class" : "Dist::Zilla::Plugin::PkgVersion", "name" : "@RJBS/PkgVersion", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::MetaConfig", "name" : "@RJBS/MetaConfig", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::MetaJSON", "name" : "@RJBS/MetaJSON", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::NextRelease", "name" : "@RJBS/NextRelease", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::Test::ChangesHasContent", @@ -262,7 +262,7 @@ { "class" : "Dist::Zilla::Plugin::PodSyntaxTests", "name" : "@RJBS/PodSyntaxTests", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::Test::ReportPrereqs", @@ -283,7 +283,7 @@ } }, "name" : "@RJBS/TestMoreWithSubtests", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::PodWeaver", @@ -428,7 +428,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.45.2", + "git_version" : "2.39.5 (Apple Git-154)", "repo_root" : "." } }, @@ -452,7 +452,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.45.2", + "git_version" : "2.39.5 (Apple Git-154)", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -469,12 +469,12 @@ "branch" : null, "changelog" : "Changes", "signed" : 0, - "tag" : "3.009", + "tag" : "3.010", "tag_format" : "%v", "tag_message" : "v%V" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.45.2", + "git_version" : "2.39.5 (Apple Git-154)", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -494,7 +494,7 @@ "remotes_must_exist" : 0 }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.45.2", + "git_version" : "2.39.5 (Apple Git-154)", "repo_root" : "." } }, @@ -505,7 +505,7 @@ "class" : "Dist::Zilla::Plugin::Git::Contributors", "config" : { "Dist::Zilla::Plugin::Git::Contributors" : { - "git_version" : "2.45.2", + "git_version" : "2.39.5 (Apple Git-154)", "include_authors" : 0, "include_releaser" : 1, "order_by" : "name", @@ -513,7 +513,7 @@ } }, "name" : "@RJBS/Git::Contributors", - "version" : "0.037" + "version" : "0.038" }, { "class" : "Dist::Zilla::Plugin::Prereqs", @@ -524,57 +524,57 @@ } }, "name" : "Prereqs", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":InstallModules", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":IncModules", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":TestFiles", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":ExtraTestFiles", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":ExecFiles", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":PerlExecFiles", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":ShareFiles", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":MainModule", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":AllFiles", - "version" : "6.032" + "version" : "6.033" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":NoFiles", - "version" : "6.032" + "version" : "6.033" } ], "zilla" : { @@ -582,7 +582,7 @@ "config" : { "is_trial" : 0 }, - "version" : "6.032" + "version" : "6.033" } }, "x_contributors" : [ @@ -598,9 +598,9 @@ "Ricardo Signes <rjbs@semiotic.systems>", "Sawyer X <xsawy...@cpan.org>" ], - "x_generated_by_perl" : "v5.38.0", + "x_generated_by_perl" : "v5.40.1", "x_rjbs_perl_window" : "long-term", - "x_serialization_backend" : "Cpanel::JSON::XS version 4.38", + "x_serialization_backend" : "Cpanel::JSON::XS version 4.39", "x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/META.yml new/Log-Dispatchouli-3.010/META.yml --- old/Log-Dispatchouli-3.009/META.yml 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/META.yml 2025-07-16 15:04:23.000000000 +0200 @@ -17,7 +17,7 @@ configure_requires: ExtUtils::MakeMaker: '6.78' dynamic_config: 0 -generated_by: 'Dist::Zilla version 6.032, CPAN::Meta::Converter version 2.150010' +generated_by: 'Dist::Zilla version 6.033, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -47,10 +47,10 @@ bugtracker: https://github.com/rjbs/Log-Dispatchouli/issues homepage: https://github.com/rjbs/Log-Dispatchouli repository: https://github.com/rjbs/Log-Dispatchouli.git -version: '3.009' +version: '3.010' x_Dist_Zilla: perl: - version: '5.038000' + version: '5.040001' plugins: - class: Dist::Zilla::Plugin::Git::GatherDir @@ -103,58 +103,58 @@ - class: Dist::Zilla::Plugin::PruneCruft name: '@RJBS/@Filter/PruneCruft' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::ManifestSkip name: '@RJBS/@Filter/ManifestSkip' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::MetaYAML name: '@RJBS/@Filter/MetaYAML' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::License name: '@RJBS/@Filter/License' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::Readme name: '@RJBS/@Filter/Readme' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::ExecDir name: '@RJBS/@Filter/ExecDir' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::ShareDir name: '@RJBS/@Filter/ShareDir' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::Manifest name: '@RJBS/@Filter/Manifest' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::TestRelease name: '@RJBS/@Filter/TestRelease' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::ConfirmRelease name: '@RJBS/@Filter/ConfirmRelease' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::UploadToCPAN name: '@RJBS/@Filter/UploadToCPAN' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::MakeMaker config: Dist::Zilla::Role::TestRunner: default_jobs: 9 name: '@RJBS/MakeMaker' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::AutoPrereqs name: '@RJBS/AutoPrereqs' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::Git::NextVersion config: @@ -163,26 +163,26 @@ version_by_branch: 1 version_regexp: (?^:^([0-9]+\.[0-9]+)$) Dist::Zilla::Role::Git::Repo: - git_version: 2.45.2 + git_version: '2.39.5 (Apple Git-154)' repo_root: . name: '@RJBS/Git::NextVersion' version: '2.051' - class: Dist::Zilla::Plugin::PkgVersion name: '@RJBS/PkgVersion' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::MetaConfig name: '@RJBS/MetaConfig' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::MetaJSON name: '@RJBS/MetaJSON' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::NextRelease name: '@RJBS/NextRelease' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::Test::ChangesHasContent name: '@RJBS/Test::ChangesHasContent' @@ -190,7 +190,7 @@ - class: Dist::Zilla::Plugin::PodSyntaxTests name: '@RJBS/PodSyntaxTests' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::Test::ReportPrereqs name: '@RJBS/Test::ReportPrereqs' @@ -206,7 +206,7 @@ phase: test type: requires name: '@RJBS/TestMoreWithSubtests' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::PodWeaver config: @@ -319,7 +319,7 @@ allow_dirty_match: [] changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.45.2 + git_version: '2.39.5 (Apple Git-154)' repo_root: . name: '@RJBS/@Git/Check' version: '2.051' @@ -337,7 +337,7 @@ allow_dirty_match: [] changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.45.2 + git_version: '2.39.5 (Apple Git-154)' repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local @@ -350,11 +350,11 @@ branch: ~ changelog: Changes signed: 0 - tag: '3.009' + tag: '3.010' tag_format: '%v' tag_message: v%V Dist::Zilla::Role::Git::Repo: - git_version: 2.45.2 + git_version: '2.39.5 (Apple Git-154)' repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local @@ -368,7 +368,7 @@ - 'github :' remotes_must_exist: 0 Dist::Zilla::Role::Git::Repo: - git_version: 2.45.2 + git_version: '2.39.5 (Apple Git-154)' repo_root: . name: '@RJBS/@Git/Push' version: '2.051' @@ -376,13 +376,13 @@ class: Dist::Zilla::Plugin::Git::Contributors config: Dist::Zilla::Plugin::Git::Contributors: - git_version: 2.45.2 + git_version: '2.39.5 (Apple Git-154)' include_authors: 0 include_releaser: 1 order_by: name paths: [] name: '@RJBS/Git::Contributors' - version: '0.037' + version: '0.038' - class: Dist::Zilla::Plugin::Prereqs config: @@ -390,52 +390,52 @@ phase: runtime type: requires name: Prereqs - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':InstallModules' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':IncModules' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':TestFiles' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':ExtraTestFiles' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':ExecFiles' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':PerlExecFiles' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':ShareFiles' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':MainModule' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':AllFiles' - version: '6.032' + version: '6.033' - class: Dist::Zilla::Plugin::FinderCode name: ':NoFiles' - version: '6.032' + version: '6.033' zilla: class: Dist::Zilla::Dist::Builder config: is_trial: 0 - version: '6.032' + version: '6.033' x_contributors: - 'Charlie Garrison <c...@garrison.com.au>' - 'Christopher J. Madsen <p...@cjmweb.net>' @@ -448,7 +448,7 @@ - 'Randy Stauner <ra...@magnificent-tears.com>' - 'Ricardo Signes <rjbs@semiotic.systems>' - 'Sawyer X <xsawy...@cpan.org>' -x_generated_by_perl: v5.38.0 +x_generated_by_perl: v5.40.1 x_rjbs_perl_window: long-term -x_serialization_backend: 'YAML::Tiny version 1.74' +x_serialization_backend: 'YAML::Tiny version 1.76' x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/Makefile.PL new/Log-Dispatchouli-3.010/Makefile.PL --- old/Log-Dispatchouli-3.009/Makefile.PL 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/Makefile.PL 2025-07-16 15:04:23.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.032. +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.033. use strict; use warnings; @@ -49,7 +49,7 @@ "lib" => 0, "utf8" => 0 }, - "VERSION" => "3.009", + "VERSION" => "3.010", "test" => { "TESTS" => "t/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/README new/Log-Dispatchouli-3.010/README --- old/Log-Dispatchouli-3.009/README 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/README 2025-07-16 15:04:23.000000000 +0200 @@ -1,5 +1,5 @@ This archive contains the distribution Log-Dispatchouli, -version 3.009: +version 3.010: a simple wrapper around Log::Dispatch @@ -9,4 +9,4 @@ the same terms as the Perl 5 programming language system itself. -This README file was generated by Dist::Zilla::Plugin::Readme v6.032. +This README file was generated by Dist::Zilla::Plugin::Readme v6.033. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/lib/Log/Dispatchouli/Global.pm new/Log-Dispatchouli-3.010/lib/Log/Dispatchouli/Global.pm --- old/Log-Dispatchouli-3.009/lib/Log/Dispatchouli/Global.pm 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/lib/Log/Dispatchouli/Global.pm 2025-07-16 15:04:23.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use warnings; -package Log::Dispatchouli::Global 3.009; +package Log::Dispatchouli::Global 3.010; # ABSTRACT: a system for sharing a global, dynamically-scoped logger use Carp (); @@ -280,7 +280,7 @@ =head1 VERSION -version 3.009 +version 3.010 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/lib/Log/Dispatchouli/Proxy.pm new/Log-Dispatchouli-3.010/lib/Log/Dispatchouli/Proxy.pm --- old/Log-Dispatchouli-3.009/lib/Log/Dispatchouli/Proxy.pm 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/lib/Log/Dispatchouli/Proxy.pm 2025-07-16 15:04:23.000000000 +0200 @@ -1,9 +1,10 @@ use v5.20; use warnings; -package Log::Dispatchouli::Proxy 3.009; +package Log::Dispatchouli::Proxy 3.010; # ABSTRACT: a simple wrapper around Log::Dispatch -use experimental 'postderef'; # Not dangerous. Is accepted without changed. +# Not dangerous. Accepted without change. +use experimental 'postderef', 'signatures'; use Log::Fmt (); use Params::Util qw(_ARRAY0 _HASH0); @@ -29,9 +30,7 @@ #pod #pod =cut -sub _new { - my ($class, $arg) = @_; - +sub _new ($class, $arg) { my $guts = { parent => $arg->{parent}, logger => $arg->{logger}, @@ -43,8 +42,7 @@ bless $guts => $class; } -sub proxy { - my ($self, $arg) = @_; +sub proxy ($self, $arg) { $arg ||= {}; my @proxy_ctx; @@ -101,9 +99,7 @@ return $_[0]->parent->get_muted; } -sub _get_all_prefix { - my ($self, $arg) = @_; - +sub _get_all_prefix ($self, $arg) { return [ $self->{proxy_prefix}, $self->get_prefix, @@ -111,8 +107,14 @@ ]; } -sub log { - my ($self, @rest) = @_; +sub flog_messages ($self, @rest) { + my $arg = _HASH0($rest[0]) ? shift(@rest) : {}; + local $arg->{prefix} = $self->_get_all_prefix($arg); + + $self->parent->flog_messages($arg, @rest); +} + +sub log ($self, @rest) { my $arg = _HASH0($rest[0]) ? shift(@rest) : {}; return if $self->_get_local_muted and ! $arg->{fatal}; @@ -122,18 +124,14 @@ $self->parent->log($arg, @rest); } -sub log_fatal { - my ($self, @rest) = @_; - +sub log_fatal ($self, @rest) { my $arg = _HASH0($rest[0]) ? shift(@rest) : {}; local $arg->{fatal} = 1; $self->log($arg, @rest); } -sub log_debug { - my ($self, @rest) = @_; - +sub log_debug ($self, @rest) { my $debug = $self->get_debug; return if defined $debug and ! $debug; @@ -143,9 +141,7 @@ $self->log($arg, @rest); } -sub _compute_proxy_ctx_kvstr_aref { - my ($self) = @_; - +sub _compute_proxy_ctx_kvstr_aref ($self) { return $self->{proxy_ctx_kvstr} //= do { my @kvstr = $self->parent->_compute_proxy_ctx_kvstr_aref->@*; @@ -158,21 +154,29 @@ }; } -sub log_event { - my ($self, $event, $data) = @_; +sub fmt_event ($self, $type, $data) { + my $kv_aref = Log::Fmt->_pairs_to_kvstr_aref([ + event => $type, + (_ARRAY0($data) ? @$data : $data->%{ sort keys %$data }) + ]); + + splice @$kv_aref, 1, 0, $self->_compute_proxy_ctx_kvstr_aref->@*; + return join q{ }, @$kv_aref; +} + +sub log_event ($self, $event, $data) { return if $self->get_muted; + my $message = $self->fmt_event($event, $data); - my $message = $self->logger->_log_event($event, - $self->_compute_proxy_ctx_kvstr_aref, - [ _ARRAY0($data) ? @$data : $data->%{ sort keys %$data } ] + $self->logger->dispatcher->log( + level => 'info', + message => $message, ); } -sub log_debug_event { - my ($self, $event, $data) = @_; - +sub log_debug_event ($self, $event, $data) { return unless $self->get_debug; return $self->log_event($event, $data); @@ -201,7 +205,7 @@ =head1 VERSION -version 3.009 +version 3.010 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/lib/Log/Dispatchouli.pm new/Log-Dispatchouli-3.010/lib/Log/Dispatchouli.pm --- old/Log-Dispatchouli-3.009/lib/Log/Dispatchouli.pm 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/lib/Log/Dispatchouli.pm 2025-07-16 15:04:23.000000000 +0200 @@ -1,6 +1,6 @@ use v5.20; use warnings; -package Log::Dispatchouli 3.009; +package Log::Dispatchouli 3.010; # ABSTRACT: a simple wrapper around Log::Dispatch # Not dangerous. Accepted without change. @@ -333,7 +333,30 @@ #pod #pod =cut -sub _join { shift; join q{ }, @{ $_[0] } } +sub _flog_messages ($self, $arg, $rest) { + my $flogger = $self->string_flogger; + my @flogged = map {; $flogger->flog($_) } @$rest; + my $message = @flogged > 1 ? join(q{ }, @flogged) : $flogged[0]; + + my @prefix = _ARRAY0($arg->{prefix}) + ? @{ $arg->{prefix} } + : $arg->{prefix}; + + for (reverse grep { defined } $self->get_prefix, @prefix) { + if (_CODELIKE( $_ )) { + $message = $_->($message); + } else { + $message =~ s/^/$_/gm; + } + } + + return $message; +} + +sub flog_messages ($self, @rest) { + my $arg = _HASH0($rest[0]) ? shift(@rest) : {}; + return $self->_flog_messages($arg, \@rest); +} sub log { my ($self, @rest) = @_; @@ -343,21 +366,7 @@ if ($arg->{fatal} or ! $self->get_muted) { try { - my $flogger = $self->string_flogger; - my @flogged = map {; $flogger->flog($_) } @rest; - $message = @flogged > 1 ? $self->_join(\@flogged) : $flogged[0]; - - my @prefix = _ARRAY0($arg->{prefix}) - ? @{ $arg->{prefix} } - : $arg->{prefix}; - - for (reverse grep { defined } $self->get_prefix, @prefix) { - if (_CODELIKE( $_ )) { - $message = $_->($message); - } else { - $message =~ s/^/$_/gm; - } - } + $message = $self->flog_messages($arg, @rest); $self->dispatcher->log( level => $arg->{level} || 'info', @@ -486,31 +495,29 @@ #pod #pod =cut -sub log_event { - my ($self, $type, $data) = @_; - - return $self->_log_event($type, undef, $data); -} - sub _compute_proxy_ctx_kvstr_aref { return []; } -sub _log_event { - my ($self, $type, $ctx, $data) = @_; - - return if $self->get_muted; - +sub fmt_event ($self, $type, $data) { my $kv_aref = Log::Fmt->_pairs_to_kvstr_aref([ event => $type, (_ARRAY0($data) ? @$data : $data->%{ sort keys %$data }) ]); - splice @$kv_aref, 1, 0, @$ctx if $ctx; + return join q{ }, @$kv_aref; +} + +sub log_event { + my ($self, $type, $data) = @_; + + return if $self->get_muted; + + my $message = $self->fmt_event($type, $data); $self->dispatcher->log( level => 'info', - message => join q{ }, @$kv_aref, + message => $message, ); return; @@ -689,6 +696,24 @@ return; } +#pod =method flog_messages +#pod +#pod my $str = $logger->flog_messages($m1, $m2, ...); +#pod +#pod This returns the string that would have been logged if the given arguments had +#pod been passed to C<< $logger->log(...) >>, without regard for log level, +#pod debugging, or the like. +#pod +#pod Unlike using the logger's string flogger, this will include any relevant prefix +#pod strings. +#pod +#pod =method fmt_event +#pod +#pod my $str = $logger->fmt_event($event_type => $data_ref); +#pod +#pod This method is equivalent to C<flog_messages>, but for an event. It returns +#pod the string format of the event, including all relevant prefixes. +#pod #pod =head1 METHODS FOR TESTING #pod #pod =head2 new_tester @@ -899,7 +924,7 @@ =head1 VERSION -version 3.009 +version 3.010 =head1 SYNOPSIS @@ -1180,6 +1205,24 @@ that trying to reinitialize with a new logger with the same C<config_id> as the current logger will not throw an exception, and will simply do no thing. +=head2 flog_messages + + my $str = $logger->flog_messages($m1, $m2, ...); + +This returns the string that would have been logged if the given arguments had +been passed to C<< $logger->log(...) >>, without regard for log level, +debugging, or the like. + +Unlike using the logger's string flogger, this will include any relevant prefix +strings. + +=head2 fmt_event + + my $str = $logger->fmt_event($event_type => $data_ref); + +This method is equivalent to C<flog_messages>, but for an event. It returns +the string format of the event, including all relevant prefixes. + =head2 dispatcher This returns the underlying Log::Dispatch object. This is not the method diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/lib/Log/Fmt.pm new/Log-Dispatchouli-3.010/lib/Log/Fmt.pm --- old/Log-Dispatchouli-3.009/lib/Log/Fmt.pm 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/lib/Log/Fmt.pm 2025-07-16 15:04:23.000000000 +0200 @@ -1,6 +1,6 @@ use v5.20; use warnings; -package Log::Fmt 3.009; +package Log::Fmt 3.010; # ABSTRACT: a little parser and emitter of structured log lines use experimental 'postderef'; # Not dangerous. Is accepted without changed. @@ -221,7 +221,7 @@ =head1 VERSION -version 3.009 +version 3.010 =head1 OVERVIEW diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/t/basic.t new/Log-Dispatchouli-3.010/t/basic.t --- old/Log-Dispatchouli-3.009/t/basic.t 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/t/basic.t 2025-07-16 15:04:23.000000000 +0200 @@ -84,7 +84,7 @@ ); } -{ +subtest "flogging, prefixing, and logging" => sub { my $logger = Log::Dispatchouli->new({ ident => 'foo', to_self => 1, @@ -106,7 +106,27 @@ is($logger->events->[1]{message}, 'xyzzy: foo', 'set a prefix'); is($logger->events->[2]{message}, 'bar', 'clear prefix'); -} +}; + +subtest "flogging, prefixing, no logging" => sub { + my $logger = Log::Dispatchouli->new({ + ident => 'foo', + to_self => 0, + log_pid => 0, + }); + + is( + $logger->flog_messages([ '%s %s', '[foo]', [qw(foo)] ], ".."), + '[foo] {{["foo"]}} ..', + "multi-arg logging", + ); + + $logger->set_prefix('xyzzy: '); + is($logger->flog_messages('foo'), 'xyzzy: foo', 'set a prefix'); + $logger->clear_prefix; + $logger->log('bar'); + is($logger->flog_messages('bar'), 'bar', 'set a prefix'); +}; { my $logger = eval { Log::Dispatchouli->new; }; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/t/proxy.t new/Log-Dispatchouli-3.010/t/proxy.t --- old/Log-Dispatchouli-3.009/t/proxy.t 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/t/proxy.t 2025-07-16 15:04:23.000000000 +0200 @@ -1,166 +1,189 @@ -use strict; +use v5.20.0; use warnings; use Log::Dispatchouli; use Test::More 0.88; -my $logger = Log::Dispatchouli->new_tester({ - ident => 't/proxy.t', -}); +use experimental 'lexical_subs'; -sub are_events { - my ($comment, $want) = @_; +{ + my $logger = Log::Dispatchouli->new_tester({ + ident => 't/proxy.t', + }); - my @have = map { $_->{message} } @{ $logger->events }; - $logger->clear_events; + my sub are_events { + my ($comment, $want) = @_; - is_deeply(\@have, $want, $comment); -} + my @have = map { $_->{message} } @{ $logger->events }; + $logger->clear_events; -$logger->log("1"); + is_deeply(\@have, $want, $comment); + } -is($logger->ident, 't/proxy.t', '$logger->ident is available'); + $logger->log("1"); -are_events("we can log a simple event", [ '1' ]); + is($logger->ident, 't/proxy.t', '$logger->ident is available'); -$logger->set_prefix("A: "); -$logger->log("2"); + are_events("we can log a simple event", [ '1' ]); -are_events("simple log with prefix", [ - 'A: 2', -]); + $logger->set_prefix("A: "); + $logger->log("2"); -my $proxy = $logger->proxy({ - proxy_prefix => 'B: ', -}); + are_events("simple log with prefix", [ + 'A: 2', + ]); -is($proxy->ident, 't/proxy.t', '$proxy->ident is available'); + my $proxy = $logger->proxy({ + proxy_prefix => 'B: ', + }); -$proxy->log("3"); + is($proxy->ident, 't/proxy.t', '$proxy->ident is available'); -are_events("log with proxy with prefix", [ - 'A: B: 3', -]); + $proxy->log("3"); -$proxy->("4"); + are_events("log with proxy with prefix", [ + 'A: B: 3', + ]); -are_events("proxy log overloading", [ - 'A: B: 4', -]); + $proxy->("4"); + are_events("proxy log overloading", [ + 'A: B: 4', + ]); -$proxy->set_prefix('C: '); -$proxy->log("4"); -$proxy->log({ prefix => 'D: ' }, "5"); -are_events("log with proxy with prefix", [ - 'A: B: C: 4', - 'A: B: C: D: 5', -]); + $proxy->set_prefix('C: '); + $proxy->log("4"); + $proxy->log({ prefix => 'D: ' }, "5"); -$logger->clear_prefix; + are_events("log with proxy with prefix", [ + 'A: B: C: 4', + 'A: B: C: D: 5', + ]); -$proxy->log("4"); -$proxy->log({ prefix => 'D: ' }, "5"); + $logger->clear_prefix; -are_events("remove the logger's parent's prefix", [ - 'B: C: 4', - 'B: C: D: 5', -]); + $proxy->log("4"); + $proxy->log({ prefix => 'D: ' }, "5"); -$logger->set_prefix('A: '); + are_events("remove the logger's parent's prefix", [ + 'B: C: 4', + 'B: C: D: 5', + ]); -my $proxprox = $proxy->proxy({ - proxy_prefix => 'E: ', -}); + $logger->set_prefix('A: '); -$proxprox->log("6"); + my $proxprox = $proxy->proxy({ + proxy_prefix => 'E: ', + }); -$proxprox->set_prefix('F: '); -$proxprox->log("7"); -$proxprox->log({ prefix => 'G: ' }, "8"); + $proxprox->log("6"); -are_events("second-order proxy, basic logging", [ - 'A: B: C: E: 6', - 'A: B: C: E: F: 7', - 'A: B: C: E: F: G: 8', -]); + $proxprox->set_prefix('F: '); + $proxprox->log("7"); + $proxprox->log({ prefix => 'G: ' }, "8"); -$logger->log_debug("logger debug"); -$proxy->log_debug("proxy debug"); -$proxprox->log_debug("proxprox debug"); + are_events("second-order proxy, basic logging", [ + 'A: B: C: E: 6', + 'A: B: C: E: F: 7', + 'A: B: C: E: F: G: 8', + ]); -are_events("no debugging on at first", [ ]); + $logger->log_debug("logger debug"); + $proxy->log_debug("proxy debug"); + $proxprox->log_debug("proxprox debug"); -$proxy->set_debug(1); + are_events("no debugging on at first", [ ]); -$logger->log_debug("logger debug"); -$proxy->log_debug("proxy debug"); -$proxprox->log_debug("proxprox debug"); + $proxy->set_debug(1); -are_events("debugging in middle tier (middle set_debug)", [ - 'A: B: C: proxy debug', - 'A: B: C: E: F: proxprox debug', -]); + $logger->log_debug("logger debug"); + $proxy->log_debug("proxy debug"); + $proxprox->log_debug("proxprox debug"); -$proxprox->set_debug(0); + are_events("debugging in middle tier (middle set_debug)", [ + 'A: B: C: proxy debug', + 'A: B: C: E: F: proxprox debug', + ]); -$logger->log_debug("logger debug"); -$proxy->log_debug("proxy debug"); -$proxprox->log_debug("proxprox debug"); + $proxprox->set_debug(0); -are_events("debugging in middle tier", [ - 'A: B: C: proxy debug', -]); + $logger->log_debug("logger debug"); + $proxy->log_debug("proxy debug"); + $proxprox->log_debug("proxprox debug"); -sub unmute_all { - $_->clear_muted for ($proxy, $proxprox); - $logger->unmute; -}; + are_events("debugging in middle tier", [ + 'A: B: C: proxy debug', + ]); + + sub unmute_all { + $_->clear_muted for ($proxy, $proxprox); + $logger->unmute; + }; -unmute_all; + unmute_all; -$proxprox->mute; -$proxprox->log("proxprox"); -$proxy->log("proxy"); -$logger->log("logger"); + $proxprox->mute; + $proxprox->log("proxprox"); + $proxy->log("proxy"); + $logger->log("logger"); -are_events("only muted proxprox", [ - 'A: B: C: proxy', - 'A: logger', -]); + are_events("only muted proxprox", [ + 'A: B: C: proxy', + 'A: logger', + ]); -unmute_all; + unmute_all; -$proxy->mute; + $proxy->mute; -$proxprox->log("proxprox"); -$proxy->log("proxy"); -$logger->log("logger"); + $proxprox->log("proxprox"); + $proxy->log("proxy"); + $logger->log("logger"); -are_events("muted proxy", [ - 'A: logger', -]); + are_events("muted proxy", [ + 'A: logger', + ]); -unmute_all; + unmute_all; -$proxprox->unmute; -$proxy->mute; + $proxprox->unmute; + $proxy->mute; -$proxprox->log("proxprox"); -$proxy->log("proxy"); -$logger->log("logger"); + $proxprox->log("proxprox"); + $proxy->log("proxy"); + $logger->log("logger"); -are_events("muted proxy, unmuted proxprox", [ - 'A: logger', -]); + are_events("muted proxy, unmuted proxprox", [ + 'A: logger', + ]); -ok($logger->logger == $logger, "logger->logger == logger"); -ok($proxy->logger == $logger, "proxy->logger == logger"); -ok($proxprox->logger == $logger, "proxprox->logger == logger"); + ok($logger->logger == $logger, "logger->logger == logger"); + ok($proxy->logger == $logger, "proxy->logger == logger"); + ok($proxprox->logger == $logger, "proxprox->logger == logger"); -ok($logger->parent == $logger, "logger->parent == logger"); -ok($proxy->parent == $logger, "proxy->parent == logger"); -ok($proxprox->parent == $proxy, "proxprox->parent == proxy"); + ok($logger->parent == $logger, "logger->parent == logger"); + ok($proxy->parent == $logger, "proxy->parent == logger"); + ok($proxprox->parent == $proxy, "proxprox->parent == proxy"); +} + +subtest "proxies and flog_messages" => sub { + my $logger = Log::Dispatchouli->new_tester({ ident => 't/proxy.t' }); + $logger->set_prefix('A: '); + + my $proxy = $logger->proxy({ proxy_prefix => 'B: ' }); + $proxy->set_prefix('C: '); + + my $proxprox = $proxy->proxy({ proxy_prefix => 'D: ' }); + $proxprox->set_prefix('E: '); + + is($logger->flog_messages("root"), "A: root", 'flog on root'); + is($proxy->flog_messages("proxy"), "A: B: C: proxy", 'flog on proxy'); + is($proxprox->flog_messages("proxprox"), "A: B: C: D: E: proxprox", 'flog on proxprox'); + + is($logger->flog_messages({ prefix => 'Z: ' }, "root"), "A: Z: root", 'flog on root with prefix'); + is($proxy->flog_messages({ prefix => 'Z: ' }, "proxy"), "A: B: C: Z: proxy", 'flog on proxy with prefix'); + is($proxprox->flog_messages({ prefix => 'Z: ' }, "proxprox"), "A: B: C: D: E: Z: proxprox", 'flog on proxprox with prefix'); +}; done_testing; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Dispatchouli-3.009/xt/release/changes_has_content.t new/Log-Dispatchouli-3.010/xt/release/changes_has_content.t --- old/Log-Dispatchouli-3.009/xt/release/changes_has_content.t 2025-01-08 03:22:29.000000000 +0100 +++ new/Log-Dispatchouli-3.010/xt/release/changes_has_content.t 2025-07-16 15:04:23.000000000 +0200 @@ -2,7 +2,7 @@ note 'Checking Changes'; my $changes_file = 'Changes'; -my $newver = '3.009'; +my $newver = '3.010'; my $trial_token = '-TRIAL'; my $encoding = 'UTF-8';