Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Log-Report for openSUSE:Factory
checked in at 2026-05-19 17:48:20
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Log-Report (Old)
and /work/SRC/openSUSE:Factory/.perl-Log-Report.new.1966 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Log-Report"
Tue May 19 17:48:20 2026 rev:2 rq:1353851 version:1.450.0
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Log-Report/perl-Log-Report.changes
2026-01-07 16:01:20.054916310 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Log-Report.new.1966/perl-Log-Report.changes
2026-05-19 17:48:24.279737366 +0200
@@ -1,0 +2,20 @@
+Tue Apr 14 07:04:10 UTC 2026 - Tina Müller <[email protected]>
+
+- updated to 1.450.0 (1.45)
+ see /usr/share/doc/packages/perl-Log-Report/ChangeLog
+
+ version 1.45: Fri 10 Apr 11:17:51 CEST 2026
+
+ Fixes:
+ - fix clone() with _class
+ [Sam Kington] github issue #18
+ - import with multiple dispatchers
+ [Andy Berverley] github issue #19
+
+ Improvements:
+ - ::Message::addTags() and ::Message::hasTag()
+ - section Accessors -> Attributes
+ - ::Message::freeze() and ::thaw()
+ [Andy Beverley] github issue #20
+
+-------------------------------------------------------------------
Old:
----
Log-Report-1.44.tar.gz
New:
----
Log-Report-1.45.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Log-Report.spec ++++++
--- /var/tmp/diff_new_pack.ZQZx3R/_old 2026-05-19 17:48:25.731797431 +0200
+++ /var/tmp/diff_new_pack.ZQZx3R/_new 2026-05-19 17:48:25.739797762 +0200
@@ -18,10 +18,10 @@
%define cpan_name Log-Report
Name: perl-Log-Report
-Version: 1.440.0
+Version: 1.450.0
Release: 0
-# 1.44 -> normalize -> 1.440.0
-%define cpan_version 1.44
+# 1.45 -> normalize -> 1.450.0
+%define cpan_version 1.45
License: Artistic-1.0 OR GPL-1.0-or-later
Summary: Report a problem, pluggable handlers and language support
URL: https://metacpan.org/release/%{cpan_name}
++++++ Log-Report-1.44.tar.gz -> Log-Report-1.45.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/ChangeLog
new/Log-Report-1.45/ChangeLog
--- old/Log-Report-1.44/ChangeLog 2025-12-22 16:56:54.000000000 +0100
+++ new/Log-Report-1.45/ChangeLog 2026-04-10 11:17:57.000000000 +0200
@@ -7,6 +7,20 @@
TODO:
. connect to Message::Passing framework
+version 1.45: Fri 10 Apr 11:17:51 CEST 2026
+
+ Fixes:
+ - fix clone() with _class
+ [Sam Kington] github issue #18
+ - import with multiple dispatchers
+ [Andy Berverley] github issue #19
+
+ Improvements:
+ - ::Message::addTags() and ::Message::hasTag()
+ - section Accessors -> Attributes
+ - ::Message::freeze() and ::thaw()
+ [Andy Beverley] github issue #20
+
version 1.44: Mon 22 Dec 16:56:48 CET 2025
Changes:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/MANIFEST new/Log-Report-1.45/MANIFEST
--- old/Log-Report-1.44/MANIFEST 2025-12-22 17:00:25.000000000 +0100
+++ new/Log-Report-1.45/MANIFEST 2026-04-10 11:18:02.000000000 +0200
@@ -42,6 +42,7 @@
t/10interp.t
t/11concat.t
t/12missing.t
+t/13freeze.t
t/31stack.t
t/41die.t
t/42exc-dbix-class.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/META.json
new/Log-Report-1.45/META.json
--- old/Log-Report-1.44/META.json 2025-12-22 17:00:25.000000000 +0100
+++ new/Log-Report-1.45/META.json 2026-04-10 11:18:02.000000000 +0200
@@ -64,7 +64,7 @@
"web" : "https://github.com/markov2/perl5-Log-Report";
}
},
- "version" : "1.44",
+ "version" : "1.45",
"x_oodist" : {
"email" : "[email protected]",
"first_year" : 2007,
@@ -84,6 +84,9 @@
{
"export" : "website",
"markup" : "html",
+ "meta" : {
+ "main_manual" : "Log::Report"
+ },
"publish" : "../public_html/log-report/doctree",
"serializer" : "json"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/META.yml new/Log-Report-1.45/META.yml
--- old/Log-Report-1.44/META.yml 2025-12-22 17:00:24.000000000 +0100
+++ new/Log-Report-1.45/META.yml 2026-04-10 11:18:02.000000000 +0200
@@ -30,7 +30,7 @@
bugtracker: https://github.com/markov2/perl5-Log-Report/issues
homepage: http://perl.overmeer.net/CPAN/
repository: https://github.com/markov2/perl5-Log-Report.git
-version: '1.44'
+version: '1.45'
x_oodist:
email: [email protected]
first_year: 2007
@@ -48,6 +48,8 @@
-
export: website
markup: html
+ meta:
+ main_manual: Log::Report
publish: ../public_html/log-report/doctree
serializer: json
include:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/Makefile.PL
new/Log-Report-1.45/Makefile.PL
--- old/Log-Report-1.44/Makefile.PL 2025-12-05 14:02:58.000000000 +0100
+++ new/Log-Report-1.45/Makefile.PL 2026-04-02 17:19:21.000000000 +0200
@@ -5,7 +5,7 @@
use strict;
# Use command 'oodist' to produce your whole software release.
-my $version = '1.44';
+my $version = '1.45';
my $webpages = '../public_html';
my $git = 'https://github.com/markov2/perl5-Log-Report';
my $publish = '../public_html/log-report';
@@ -49,21 +49,24 @@
publish => "$publish/raw",
},
- generate => [
- { format => 'pod3',
- podtail => undef,
- },
- { format => 'html',
- webpages => "$webpages/logreport/html",
- publish => "$publish/htmlpkg",
- docroot => "/logreport/html",
- templates => "html",
- stylesheet => "/logreport/html/oodoc.css",
- },
- { export => 'website',
+ generate => [ {
+ format => 'pod3',
+ podtail => undef,
+ }, {
+ format => 'html',
+ webpages => "$webpages/logreport/html",
+ publish => "$publish/htmlpkg",
+ docroot => "/logreport/html",
+ templates => "html",
+ stylesheet => "/logreport/html/oodoc.css",
+ }, {
+ export => 'website',
serializer => 'json',
markup => 'html',
publish => "$publish/doctree",
+ meta => {
+ main_manual => 'Log::Report',
+ },
},
],
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/DBIC/Profiler.pm
new/Log-Report-1.45/lib/Log/Report/DBIC/Profiler.pm
--- old/Log-Report-1.44/lib/Log/Report/DBIC/Profiler.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/DBIC/Profiler.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::DBIC::Profiler;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'DBIx::Class::Storage::Statistics';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/DBIC/Profiler.pod
new/Log-Report-1.45/lib/Log/Report/DBIC/Profiler.pod
--- old/Log-Report-1.44/lib/Log/Report/DBIC/Profiler.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/DBIC/Profiler.pod 2026-04-10
11:17:57.000000000 +0200
@@ -33,14 +33,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Die.pm
new/Log-Report-1.45/lib/Log/Report/Die.pm
--- old/Log-Report-1.44/lib/Log/Report/Die.pm 2025-12-22 17:00:20.000000000
+0100
+++ new/Log-Report-1.45/lib/Log/Report/Die.pm 2026-04-10 11:17:57.000000000
+0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Die;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use parent 'Exporter';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Die.pod
new/Log-Report-1.45/lib/Log/Report/Die.pod
--- old/Log-Report-1.44/lib/Log/Report/Die.pod 2025-12-22 17:00:20.000000000
+0100
+++ new/Log-Report-1.45/lib/Log/Report/Die.pod 2026-04-10 11:17:57.000000000
+0200
@@ -78,14 +78,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Report-1.44/lib/Log/Report/Dispatcher/Callback.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Callback.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Callback.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Callback.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::Callback;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Report-1.44/lib/Log/Report/Dispatcher/Callback.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Callback.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Callback.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Callback.pod 2026-04-10
11:17:57.000000000 +0200
@@ -89,9 +89,9 @@
=back
-=head2 Accessors
+=head2 Attributes
-Extends L<"Accessors" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Accessors">.
+Extends L<"Attributes" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Attributes">.
=over 4
@@ -101,23 +101,23 @@
=item $obj-E<gt>B<isDisabled>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<mode>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<name>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<needs>( [$reason] )
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<type>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=back
@@ -177,14 +177,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/File.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/File.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/File.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/File.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::File;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/File.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/File.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/File.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/File.pod 2026-04-10
11:17:57.000000000 +0200
@@ -156,9 +156,9 @@
=back
-=head2 Accessors
+=head2 Attributes
-Extends L<"Accessors" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Accessors">.
+Extends L<"Attributes" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Attributes">.
=over 4
@@ -173,19 +173,19 @@
=item $obj-E<gt>B<isDisabled>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<mode>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<name>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<needs>( [$reason] )
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<output>($msg)
@@ -194,7 +194,7 @@
=item $obj-E<gt>B<type>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=back
@@ -282,14 +282,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Report-1.44/lib/Log/Report/Dispatcher/Log4perl.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Log4perl.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Log4perl.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Log4perl.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::Log4perl;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Report-1.44/lib/Log/Report/Dispatcher/Log4perl.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Log4perl.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Log4perl.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Log4perl.pod 2026-04-10
11:17:57.000000000 +0200
@@ -128,15 +128,15 @@
=back
-=head2 Accessors
+=head2 Attributes
-Extends L<"Accessors" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Accessors">.
+Extends L<"Attributes" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Attributes">.
=over 4
=item $obj-E<gt>B<isDisabled>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<logger>( [$domain] )
@@ -147,19 +147,19 @@
=item $obj-E<gt>B<mode>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<name>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<needs>( [$reason] )
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<type>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=back
@@ -233,14 +233,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Report-1.44/lib/Log/Report/Dispatcher/LogDispatch.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/LogDispatch.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/LogDispatch.pm
2025-12-22 17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/LogDispatch.pm
2026-04-10 11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::LogDispatch;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Log-Report-1.44/lib/Log/Report/Dispatcher/LogDispatch.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/LogDispatch.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/LogDispatch.pod
2025-12-22 17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/LogDispatch.pod
2026-04-10 11:17:57.000000000 +0200
@@ -104,9 +104,9 @@
=back
-=head2 Accessors
+=head2 Attributes
-Extends L<"Accessors" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Accessors">.
+Extends L<"Attributes" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Attributes">.
=over 4
@@ -116,23 +116,23 @@
=item $obj-E<gt>B<isDisabled>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<mode>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<name>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<needs>( [$reason] )
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<type>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=back
@@ -197,14 +197,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/Perl.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Perl.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Perl.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Perl.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::Perl;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/Perl.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Perl.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Perl.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Perl.pod 2026-04-10
11:17:57.000000000 +0200
@@ -57,14 +57,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/Syslog.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Syslog.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Syslog.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Syslog.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::Syslog;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/Syslog.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Syslog.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Syslog.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Syslog.pod 2026-04-10
11:17:57.000000000 +0200
@@ -133,9 +133,9 @@
=back
-=head2 Accessors
+=head2 Attributes
-Extends L<"Accessors" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Accessors">.
+Extends L<"Attributes" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Attributes">.
=over 4
@@ -145,23 +145,23 @@
=item $obj-E<gt>B<isDisabled>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<mode>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<name>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<needs>( [$reason] )
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<type>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=back
@@ -230,14 +230,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/Try.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Try.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Try.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Try.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher::Try;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Log::Report::Dispatcher';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher/Try.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher/Try.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher/Try.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher/Try.pod 2026-04-10
11:17:57.000000000 +0200
@@ -128,7 +128,7 @@
=item hide => $reasons|\@reasons|'ALL'|'NONE'
-[1.09] see L<hide()|Log::Report::Dispatcher::Try/"Accessors">
+[1.09] see L<hide()|Log::Report::Dispatcher::Try/"Attributes">
=item locale => LOCALE
@@ -145,9 +145,9 @@
=back
-=head2 Accessors
+=head2 Attributes
-Extends L<"Accessors" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Accessors">.
+Extends L<"Attributes" in
Log::Report::Dispatcher|Log::Report::Dispatcher/"Attributes">.
=over 4
@@ -191,23 +191,23 @@
=item $obj-E<gt>B<isDisabled>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<mode>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<name>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<needs>( [$reason] )
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=item $obj-E<gt>B<type>()
-Inherited, see L<Log::Report::Dispatcher/"Accessors">
+Inherited, see L<Log::Report::Dispatcher/"Attributes">
=back
@@ -323,14 +323,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher.pm
new/Log-Report-1.45/lib/Log/Report/Dispatcher.pm
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Dispatcher;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Dispatcher.pod
new/Log-Report-1.45/lib/Log/Report/Dispatcher.pod
--- old/Log-Report-1.44/lib/Log/Report/Dispatcher.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Dispatcher.pod 2026-04-10
11:17:57.000000000 +0200
@@ -110,7 +110,7 @@
=back
-=head2 Accessors
+=head2 Attributes
=over 4
@@ -319,7 +319,7 @@
will get translated as well. Otherwise, all will be in English.
Exactly what will be added depends on the actual mode of the dispatcher
-(change it with L<mode()|Log::Report::Dispatcher/"Accessors">, initiate it
with L<new(mode)|Log::Report::Dispatcher/"Constructors">).
+(change it with L<mode()|Log::Report::Dispatcher/"Attributes">, initiate it
with L<new(mode)|Log::Report::Dispatcher/"Constructors">).
mode mode mode mode
REASON SOURCE TE! NORM VERB ASSE DEBUG
@@ -411,14 +411,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Domain.pm
new/Log-Report-1.45/lib/Log/Report/Domain.pm
--- old/Log-Report-1.44/lib/Log/Report/Domain.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Domain.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Domain;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use parent 'Log::Report::Minimal::Domain';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Domain.pod
new/Log-Report-1.45/lib/Log/Report/Domain.pod
--- old/Log-Report-1.44/lib/Log/Report/Domain.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Domain.pod 2026-04-10
11:17:57.000000000 +0200
@@ -320,14 +320,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Exception.pm
new/Log-Report-1.45/lib/Log/Report/Exception.pm
--- old/Log-Report-1.44/lib/Log/Report/Exception.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Exception.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Exception;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Exception.pod
new/Log-Report-1.45/lib/Log/Report/Exception.pod
--- old/Log-Report-1.44/lib/Log/Report/Exception.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Exception.pod 2026-04-10
11:17:57.000000000 +0200
@@ -68,7 +68,7 @@
=back
-=head2 Accessors
+=head2 Attributes
=over 4
@@ -181,14 +181,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Message.pm
new/Log-Report-1.45/lib/Log/Report/Message.pm
--- old/Log-Report-1.44/lib/Log/Report/Message.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Message.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Message;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
@@ -49,8 +49,7 @@
$s{_count} = ref $c eq 'ARRAY' ? @$c : keys %$c;
}
- defined $s{_join}
- or $s{_join} = $";
+ $s{_join} //= $";
if($s{_msgid})
{ $s{_append} = defined $s{_append} ? $1.$s{_append} : $1
@@ -63,8 +62,8 @@
{ s/\s+$//, s/^\s+// for $s{_plural};
}
- my $tags = delete $s{_tag} // delete $s{_tags} // delete $s{_class} //
delete $s{_classes} // [];
- $s{_tags} = ref $tags eq 'ARRAY' ? $tags : [ split /[,\s]+/, $tags ];
+ my $tags = delete $s{_tag} // delete $s{_tags} // delete $s{_class} //
delete $s{_classes};
+ $s{_tags} = ref $tags eq 'ARRAY' ? $tags : [ split /[,\s]+/, $tags ] if
defined $tags;
bless \%s, $class;
}
@@ -89,10 +88,13 @@
sub msgctxt() { $_[0]->{_msgctxt}}
-sub tags() { @{$_[0]->{_tags}} }
+sub tags() { @{$_[0]->{_tags} || []} }
*classes = \&tags;
+sub addTags() { push @{shift->{_tags}}, @_ }
+
+
sub to(;$)
{ my $self = shift;
@_ ? $self->{_to} = shift : $self->{_to};
@@ -181,6 +183,38 @@
(ref $self)->new(%$self, _append => $what);
}
+
+sub freeze()
+{ my ($self, %args) = @_;
+ my %data = %$self;
+ if(my $p = $data{_prepend})
+ { $data{_prepend} = blessed $p && $p->isa(__PACKAGE__) ?
$p->freeze(%args) : "$p";
+ }
+ if(my $a = $data{_append})
+ { $data{_append} = blessed $a && $a->isa(__PACKAGE__) ?
$a->freeze(%args) : "$a";
+ }
+ if(my $d = $data{_domain})
+ { $data{_domain} = $d->name if blessed $d &&
$d->isa('Log::Report::Minimal::Domain');
+ }
+ $data{_lr_version} = $Log::Report::VERSION // '3.14';
+ \%data;
+}
+
+
+sub thaw($%)
+{ my ($class, $data, %args) = @_;
+ my %data = %$data;
+ if(my $p = $data{_prepend})
+ { $data{_prepend} = ref $p eq 'HASH' ? $class->thaw($p, %args) :
$p;
+ }
+ if(my $a = $data{_append})
+ { $data{_append} = ref $a eq 'HASH' ? $class->thaw($a, %args) :
$a;
+ }
+ delete $data{_lr_version};
+ $class->new(%data);
+}
+
+
#--------------------
1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Message.pod
new/Log-Report-1.45/lib/Log/Report/Message.pod
--- old/Log-Report-1.44/lib/Log/Report/Message.pod 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Message.pod 2026-04-10
11:17:57.000000000 +0200
@@ -32,6 +32,9 @@
print __"\tCongratulations,\n";
print "\t", __("Congratulations,"), "\n"; # same
+ # Object serialization support
+ my $clone = Log::Report::Message->thaw($msg->freeze);
+
=head1 DESCRIPTION
Any use of a constructor function exported by L<Log::Report|Log::Report>, like
@@ -214,7 +217,7 @@
category (group, class) of the exception.
The C<$tags> is interpreted as comma- and/or blank separated list of class
-tokens (barewords), the ARRAY lists all tags separately. See
L<tags()|Log::Report::Message/"Accessors">.
+tokens (barewords), the ARRAY lists all tags separately. See
L<tags()|Log::Report::Message/"Attributes">.
=item _tags => $tags|\@tags
@@ -223,16 +226,20 @@
=item _to => $dispatcher
Specify the C<$dispatcher> as destination explicitly. Short
-for C<< report {to => NAME}, ... >> See
L<to()|Log::Report::Message/"Accessors">
+for C<< report {to => NAME}, ... >> See
L<to()|Log::Report::Message/"Attributes">
=back
=back
-=head2 Accessors
+=head2 Attributes
=over 4
+=item $obj-E<gt>B<addTags>(@tags)
+
+[1.45] Add zero or more tags to this message.
+
=item $obj-E<gt>B<append>()
Returns the string or L<Log::Report::Message|Log::Report::Message> object
which is appended
@@ -240,7 +247,7 @@
=item $obj-E<gt>B<classes>()
-Deprecated alternative for L<tags()|Log::Report::Message/"Accessors">.
+Deprecated alternative for L<tags()|Log::Report::Message/"Attributes">.
=item $obj-E<gt>B<context>()
@@ -276,7 +283,7 @@
=item $obj-E<gt>B<tags>()
-Returns the LIST of tags which are defined for this message; message
+[1.44] Returns the LIST of tags which are defined for this message; message
group indicators, as often found in exception-based programming.
=item $obj-E<gt>B<to>( [$name] )
@@ -341,15 +348,32 @@
print __"Hello" . ' ' . __"World!\n";
print __("Hello")->concat(' ')->concat(__"World!")->concat("\n");
+=item $obj-E<gt>B<freeze>(%options)
+
+Convert the data of this message into a (nested) HASH which optimally
+preserves its content. Pass this to
L<thaw()|Log::Report::Message/"Processing"> to get the object back.
+
+The returned HASH can be serialized safely with (for instance) YAML
+or JSON. Then, it can be reconstructed from the de-serialized data.
+At the moment, all facts can be preserved.
+
+» example: to thaw a frozen
+
+ my $clone = Log::Report::Message->thaw($msg->freeze);
+
=item $obj-E<gt>B<inClass>($tag|Regexp)
Deprecated alternative for L<taggedWith()|Log::Report::Message/"Processing">.
=item $obj-E<gt>B<taggedWith>($tag|Regexp)
-Returns C<true> if the message carries the specified C<$tag> (string) or
+[1.44] Returns C<true> if the message carries the specified C<$tag> (string) or
matches the Regexp. The trueth value is the (first matching) tag.
+=item $class-E<gt>B<thaw>(\%data, %options)
+
+Z<>
+
=item $obj-E<gt>B<toHTML>( [$locale] )
[1.11] Translate the message, and then entity encode HTML volatile characters.
@@ -680,14 +704,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Translator.pm
new/Log-Report-1.45/lib/Log/Report/Translator.pm
--- old/Log-Report-1.44/lib/Log/Report/Translator.pm 2025-12-22
17:00:20.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Translator.pm 2026-04-10
11:17:57.000000000 +0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report::Translator;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report/Translator.pod
new/Log-Report-1.45/lib/Log/Report/Translator.pod
--- old/Log-Report-1.44/lib/Log/Report/Translator.pod 2025-12-22
17:00:21.000000000 +0100
+++ new/Log-Report-1.45/lib/Log/Report/Translator.pod 2026-04-10
11:17:57.000000000 +0200
@@ -44,7 +44,7 @@
=back
-=head2 Accessors
+=head2 Attributes
=head2 Translating
@@ -68,14 +68,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report.pm
new/Log-Report-1.45/lib/Log/Report.pm
--- old/Log-Report-1.44/lib/Log/Report.pm 2025-12-22 17:00:20.000000000
+0100
+++ new/Log-Report-1.45/lib/Log/Report.pm 2026-04-10 11:17:57.000000000
+0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package Log::Report;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use base 'Exporter';
@@ -247,12 +247,13 @@
for my $n (@_) { push @disps, grep $_->name eq $n, @$disps }
}
- wantarray || @disps < 2
- or error __"only one dispatcher name accepted in SCALAR
context.";
+ wantarray || !defined wantarray || @disps < 2
+ or error __"only one dispatcher name accepted in SCALAR
context.";
if($command eq 'close')
{ my %kill = map +($_->name => 1), @disps;
@$disps = grep !$kill{$_->name}, @$disps;
+
$_->close for @disps;
}
elsif($command eq 'enable') { $_->_disabled(0) for @disps }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/Log/Report.pod
new/Log-Report-1.45/lib/Log/Report.pod
--- old/Log-Report-1.44/lib/Log/Report.pod 2025-12-22 17:00:20.000000000
+0100
+++ new/Log-Report-1.45/lib/Log/Report.pod 2026-04-10 11:17:57.000000000
+0200
@@ -1243,10 +1243,10 @@
=item Error: only one dispatcher name accepted in SCALAR context.
-In SCALAR context, only one dispatcher name accepted
-The L<dispatcher()|Log::Report/"Report production and configuration"> method
returns the L<Log::Report::Dispatcher|Log::Report::Dispatcher>
-objects which it has accessed. When multiple names where given, it
-wishes to return a LIST of objects, not the count of them.
+In SCALAR context, only one dispatcher name accepted The
L<dispatcher()|Log::Report/"Report production and configuration">
+method returns the L<Log::Report::Dispatcher|Log::Report::Dispatcher> objects
which it has accessed.
+When multiple names where given, it wishes to return a LIST of objects,
+not the count of them.
Cast by C<dispatcher()>
=item Error: syntax flag must be either SHORT or REPORT, not `$flag' in $fn
line $line
@@ -1277,14 +1277,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/MojoX/Log/Report.pm
new/Log-Report-1.45/lib/MojoX/Log/Report.pm
--- old/Log-Report-1.44/lib/MojoX/Log/Report.pm 2025-12-22 17:00:20.000000000
+0100
+++ new/Log-Report-1.45/lib/MojoX/Log/Report.pm 2026-04-10 11:17:57.000000000
+0200
@@ -1,8 +1,8 @@
-# This code is part of Perl distribution Log-Report version 1.44.
+# This code is part of Perl distribution Log-Report version 1.45.
# The POD got stripped from this file by OODoc version 3.06.
# For contributors see file ChangeLog.
-# This software is copyright (c) 2007-2025 by Mark Overmeer.
+# This software is copyright (c) 2007-2026 by Mark Overmeer.
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
@@ -10,7 +10,7 @@
package MojoX::Log::Report;{
-our $VERSION = '1.44';
+our $VERSION = '1.45';
}
use Mojo::Base 'Mojo::Log'; # implies use strict etc
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/lib/MojoX/Log/Report.pod
new/Log-Report-1.45/lib/MojoX/Log/Report.pod
--- old/Log-Report-1.44/lib/MojoX/Log/Report.pod 2025-12-22
17:00:21.000000000 +0100
+++ new/Log-Report-1.45/lib/MojoX/Log/Report.pod 2026-04-10
11:17:57.000000000 +0200
@@ -49,14 +49,14 @@
=head1 SEE ALSO
-This module is part of Log-Report version 1.44,
-built on December 22, 2025. Website: F<http://perl.overmeer.net/CPAN/>
+This module is part of Log-Report version 1.45,
+built on April 10, 2026. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
-This software is copyright (c) 2007-2025 by Mark Overmeer.
+This software is copyright (c) 2007-2026 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Log-Report-1.44/t/13freeze.t
new/Log-Report-1.45/t/13freeze.t
--- old/Log-Report-1.44/t/13freeze.t 1970-01-01 01:00:00.000000000 +0100
+++ new/Log-Report-1.45/t/13freeze.t 2026-04-02 17:21:13.000000000 +0200
@@ -0,0 +1,116 @@
+#!/usr/bin/env perl
+# freezing and thawing a message object
+
+use warnings;
+use strict;
+
+use Test::More;
+use Scalar::Util 'refaddr';
+
+use Log::Report;
+use Log::Report::Message;
+#use Data::Dumper;
+
+my $LR_VERSION = $Log::Report::VERSION // '3.14';
+
+###
+### Simple
+###
+
+my $msg1 = Log::Report::Message->new(
+ _domain => 'test',
+ _msgid => 'the answer is {var}!',
+ _tags => 'monkey, donkey',
+ var => 42,
+ _expand => 1,
+);
+
+ok defined $msg1, 'created message manually';
+isa_ok $msg1, 'Log::Report::Message', '...';
+
+### Freeze
+
+my $msg1f = $msg1->freeze;
+ok defined $msg1f, 'Freeze';
+
+#warn Dumper $msg1f;
+
+is_deeply $msg1f, {
+ _domain => 'test',
+ _msgid => 'the answer is {var}!',
+ _tags => [ qw/monkey donkey/ ],
+ _expand => 1,
+ var => 42,
+
+ _join => ' ',
+ _lr_version => $LR_VERSION,
+}, '... content';
+
+### Thaw
+
+my $msg1t = Log::Report::Message->thaw($msg1f);
+ok defined $msg1t, 'Thaw';
+isa_ok $msg1t, 'Log::Report::Message', '...';
+is $msg1t->msgid, 'the answer is {var}!', '... msgid';
+is $msg1t->domain, 'test', '... domain';
+ok $msg1t->taggedWith('monkey'), '... tag1';
+ok $msg1t->taggedWith('donkey'), '... tag2';
+is $msg1t->valueOf('var'), 42, '... var';
+
+###
+### Nested
+###
+
+my $msg2 = (__x"before") . $msg1 . (__x"after", _domain => textdomain
'default');
+
+ok defined $msg2, 'created message with append and prepend';
+isa_ok $msg2, 'Log::Report::Message', '...';
+#warn Dumper $msg2;
+
+### freeze
+
+my $msg2f = $msg2->freeze;
+ok defined $msg2f, 'Frozen complex';
+is ref $msg2f, 'HASH', '... HASH output';
+#warn Dumper $msg2f;
+
+# unsafe during distribution
+$msg2f->{_use} = 'REMOVED';
+$msg2f->{_append}{_append}{_use} = 'REMOVED';
+
+is_deeply $msg2f, +{
+ _msgid => 'before',
+ _domain => 'default',
+ _append => {
+ _msgid => 'the answer is {var}!',
+ var => 42,
+ _tags => [ qw/monkey donkey/ ],
+ _expand => 1,
+ _append => {
+ _msgid => 'after',
+ _expand => 1,
+ _join => ' ',
+ _domain => 'default',
+ _use => 'REMOVED',
+ _lr_version => $LR_VERSION,
+ },
+ _domain => 'test',
+ _join => ' ',
+ _lr_version => $LR_VERSION,
+ },
+ _join => ' ',
+ _expand => 1,
+ _use => 'REMOVED',
+ _lr_version => $LR_VERSION,
+}, '... no objects';
+
+### thaw
+
+my $msg2t = Log::Report::Message->thaw($msg2f);
+ok defined $msg2t, 'Thaw complex';
+isa_ok $msg2t, 'Log::Report::Message', '... before, ';
+isa_ok $msg2t->append, 'Log::Report::Message', '... middle, ';
+isa_ok $msg2t->append->append, 'Log::Report::Message', '... after,';
+is $msg2t->toString, 'beforethe answer is 42!after', '... string';
+
+done_testing;
++++++ _scmsync.obsinfo ++++++
--- /var/tmp/diff_new_pack.ZQZx3R/_old 2026-05-19 17:48:25.987808022 +0200
+++ /var/tmp/diff_new_pack.ZQZx3R/_new 2026-05-19 17:48:25.987808022 +0200
@@ -1,6 +1,6 @@
-mtime: 1767367814
-commit: 51628f83a3ec84d8fbce4658390b6a0dfc284694d7aabd8cb69bb0a07d4d75d8
-url: https://src.opensuse.org/perl/perl-Log-Report.git
-revision: 51628f83a3ec84d8fbce4658390b6a0dfc284694d7aabd8cb69bb0a07d4d75d8
+mtime: 1776150250
+commit: cfd632c4568409ae9f80f1f5bde6f5e3706fd96570886ce48e34175b82bdfeea
+url: https://src.opensuse.org/perl/perl-Log-Report
+revision: cfd632c4568409ae9f80f1f5bde6f5e3706fd96570886ce48e34175b82bdfeea
projectscmsync: https://src.opensuse.org/perl/_ObsPrj
++++++ build.specials.obscpio ++++++
++++++ build.specials.obscpio ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/.gitignore new/.gitignore
--- old/.gitignore 1970-01-01 01:00:00.000000000 +0100
+++ new/.gitignore 2026-04-14 09:04:10.000000000 +0200
@@ -0,0 +1 @@
+.osc
