Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Data-Printer for openSUSE:Factory checked in at 2024-03-08 18:08:56 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Data-Printer (Old) and /work/SRC/openSUSE:Factory/.perl-Data-Printer.new.1770 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Data-Printer" Fri Mar 8 18:08:56 2024 rev:9 rq:1156064 version:1.002001 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Data-Printer/perl-Data-Printer.changes 2023-08-04 15:03:27.648294542 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Data-Printer.new.1770/perl-Data-Printer.changes 2024-03-08 18:09:04.925912096 +0100 @@ -1,0 +2,17 @@ +Tue Jan 23 03:06:31 UTC 2024 - Tina Müller <timueller+p...@suse.de> + +- updated to 1.002001 + see /usr/share/doc/packages/perl-Data-Printer/Changes + + 1.2.1 2024-01-21 + BUG FIXES: + - Ensure that core boolean support doesn't fail on perls + older than 5.36 (Paul Evans) + + 1.2.0 2024-01-21 + NEW FEATURES: + - support the core boolean type (true/false) in perl >= 5.36.0 + OTHER: + - doc fixes and improvements (Florian Schlichting, Andre Klärner) + +------------------------------------------------------------------- Old: ---- Data-Printer-1.001001.tar.gz New: ---- Data-Printer-1.002001.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Data-Printer.spec ++++++ --- /var/tmp/diff_new_pack.mefdYp/_old 2024-03-08 18:09:05.453931934 +0100 +++ /var/tmp/diff_new_pack.mefdYp/_new 2024-03-08 18:09:05.457932084 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Data-Printer # -# Copyright (c) 2023 SUSE LLC +# Copyright (c) 2024 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -18,7 +18,7 @@ %define cpan_name Data-Printer Name: perl-Data-Printer -Version: 1.001001 +Version: 1.002001 Release: 0 License: Artistic-1.0 OR GPL-1.0-or-later Summary: Colored & full-featured pretty print of Perl data structures and objects ++++++ Data-Printer-1.001001.tar.gz -> Data-Printer-1.002001.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/Changes new/Data-Printer-1.002001/Changes --- old/Data-Printer-1.001001/Changes 2023-07-30 05:43:48.413930012 +0200 +++ new/Data-Printer-1.002001/Changes 2024-01-18 01:47:16.000000000 +0100 @@ -1,5 +1,16 @@ Revision history for Data-Printer +1.2.1 2024-01-21 + BUG FIXES: + - Ensure that core boolean support doesn't fail on perls + older than 5.36 (Paul Evans) + +1.2.0 2024-01-21 + NEW FEATURES: + - support the core boolean type (true/false) in perl >= 5.36.0 + OTHER: + - doc fixes and improvements (Florian Schlichting, Andre Klärner) + 1.1.1 2023-07-30 BUG FIXES: - explicitly mentions that native perl classes (perl 5.38) do not diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/META.json new/Data-Printer-1.002001/META.json --- old/Data-Printer-1.001001/META.json 2023-07-30 05:47:38.000000000 +0200 +++ new/Data-Printer-1.002001/META.json 2024-01-18 01:49:11.000000000 +0100 @@ -53,6 +53,6 @@ "url" : "https://github.com/garu/Data-Printer" } }, - "version" : "1.001001", - "x_serialization_backend" : "JSON::PP version 4.16" + "version" : "1.002001", + "x_serialization_backend" : "JSON::PP version 4.07" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/META.yml new/Data-Printer-1.002001/META.yml --- old/Data-Printer-1.001001/META.yml 2023-07-30 05:47:38.000000000 +0200 +++ new/Data-Printer-1.002001/META.yml 2024-01-18 01:49:11.000000000 +0100 @@ -28,5 +28,5 @@ bugtracker: https://github.com/garu/Data-Printer/issues/ license: http://dev.perl.org/licenses/ repository: https://github.com/garu/Data-Printer -version: '1.001001' +version: '1.002001' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/README.md new/Data-Printer-1.002001/README.md --- old/Data-Printer-1.001001/README.md 2023-07-30 05:42:56.000000000 +0200 +++ new/Data-Printer-1.002001/README.md 2024-01-18 00:03:36.000000000 +0100 @@ -103,7 +103,7 @@ LICENSE AND COPYRIGHT --------------------- -Copyright (C) 2011-2023 Breno G. de Oliveira +Copyright (C) 2011-2024 Breno G. de Oliveira This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/examples/try_me.pl new/Data-Printer-1.002001/examples/try_me.pl --- old/Data-Printer-1.001001/examples/try_me.pl 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/examples/try_me.pl 2024-01-17 22:10:51.000000000 +0100 @@ -30,12 +30,14 @@ baz => 789, }, readonly => \2, + boolean => [1 == 1, 1 == 2], regexp => qr/foo.*bar/i, glob => \*STDOUT, code => sub { return 42 }, class => $obj, }; + $sample->{weakref} = $sample; weaken $sample->{weakref}; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/DDP.pm new/Data-Printer-1.002001/lib/DDP.pm --- old/Data-Printer-1.001001/lib/DDP.pm 2023-07-30 05:29:57.000000000 +0200 +++ new/Data-Printer-1.002001/lib/DDP.pm 2024-01-18 01:47:16.000000000 +0100 @@ -5,7 +5,7 @@ BEGIN { push our @ISA, 'Data::Printer'; - our $VERSION = '1.001001'; + our $VERSION = '1.002001'; $VERSION = eval $VERSION; } 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Filter/SCALAR.pm new/Data-Printer-1.002001/lib/Data/Printer/Filter/SCALAR.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Filter/SCALAR.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Filter/SCALAR.pm 2024-01-18 01:43:22.000000000 +0100 @@ -4,6 +4,8 @@ use Data::Printer::Filter; use Scalar::Util; +use constant HAS_BOOLEAN => $] ge '5.036000'; + filter 'SCALAR' => \&parse; filter 'LVALUE' => sub { my ($scalar_ref, $ddp) = @_; @@ -23,6 +25,13 @@ if (not defined $value) { $ret = $ddp->maybe_colorize('undef', 'undef'); } + elsif (HAS_BOOLEAN && _is_bool($value)) { + if ($value) { + $ret = $ddp->maybe_colorize('true', 'true'); + } else { + $ret = $ddp->maybe_colorize('false', 'false'); + } + } elsif ( $ddp->show_dualvar ne 'off' ) { my $numified; $numified = do { no warnings 'numeric'; 0+ $value } if defined $value; @@ -122,4 +131,10 @@ return $is_number; } +sub _is_bool { + no if HAS_BOOLEAN, warnings => 'experimental::builtin'; + return builtin::is_bool($_[0]); +} + + 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Filter/Web.pm new/Data-Printer-1.002001/lib/Data/Printer/Filter/Web.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Filter/Web.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Filter/Web.pm 2024-01-17 19:20:41.000000000 +0100 @@ -264,7 +264,7 @@ =head1 DESCRIPTION This is a filter plugin for L<Data::Printer>. It filters through several -web-related objects and display their content in a (hopefully!) more userful +web-related objects and display their content in a (hopefully!) more useful way than a regular dump. =head1 PARSED MODULES diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Object.pm new/Data-Printer-1.002001/lib/Data/Printer/Object.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Object.pm 2023-07-30 05:18:53.000000000 +0200 +++ new/Data-Printer-1.002001/lib/Data/Printer/Object.pm 2024-01-17 19:20:41.000000000 +0100 @@ -859,7 +859,7 @@ =head3 show_lvalue -Let's you know whenever a value is an lvalue (default: 1) +Lets you know whenever a value is an lvalue (default: 1) =head3 string_max @@ -896,7 +896,7 @@ =head3 print_escapes -Wether to print invisible characters in strings, like \b, \n and \t (default: 0) +Whether to print invisible characters in strings, like \b, \n and \t (default: 0) =head3 resolve_scalar_refs diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Profile.pm new/Data-Printer-1.002001/lib/Data/Printer/Profile.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Profile.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Profile.pm 2024-01-17 19:20:41.000000000 +0100 @@ -79,7 +79,7 @@ However, that is of course only true when the profile is loaded together with the other settings. If you set a profile later, for instance as an argument to C<p()> or C<np()>, then the profile will override any previous settings - -though it will still be overriden by other inline arguments. +though it will still be overridden by other inline arguments. =head1 SEE ALSO diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Theme/Classic.pm new/Data-Printer-1.002001/lib/Data/Printer/Theme/Classic.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Theme/Classic.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Theme/Classic.pm 2024-01-17 22:21:28.000000000 +0100 @@ -18,6 +18,8 @@ vstring => 'bright_blue', # version strings (v5.16.0, etc) lvalue => '', # lvalue label format => '', # format type + true => 'bright_cyan', # boolean type (true) + false => 'bright_cyan', # boolean type (false) repeated => 'white on_red', # references to seen values caller_info => 'bright_cyan', # details on what's being printed weak => 'cyan', # weak references diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Theme/Material.pm new/Data-Printer-1.002001/lib/Data/Printer/Theme/Material.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Theme/Material.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Theme/Material.pm 2024-01-17 22:19:02.000000000 +0100 @@ -1,6 +1,6 @@ package Data::Printer::Theme::Material; # inspired by Mattia Astorino's Material theme: -# https://github.com/equinusocio/vsc-material-theme +# https://github.com/material-theme/vsc-material-theme use strict; use warnings; @@ -37,6 +37,8 @@ vstring => $code_for{strong_orange}, # version strings (v5.16.0, etc) lvalue => $code_for{strong_orange}, # lvalue label format => $code_for{strong_orange}, # format type + true => $code_for{blue}, # boolean type (true) + false => $code_for{blue}, # boolean type (false) repeated => $code_for{red}, # references to seen values caller_info => $code_for{gray}, # details on what's being printed weak => $code_for{green}, # weak references flag diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Theme/Monokai.pm new/Data-Printer-1.002001/lib/Data/Printer/Theme/Monokai.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Theme/Monokai.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Theme/Monokai.pm 2024-01-17 22:04:39.000000000 +0100 @@ -28,6 +28,8 @@ vstring => $code_for{cyan}, # version strings (v5.16.0, etc) lvalue => $code_for{green}, # lvalue label format => $code_for{violet}, # format type + true => $code_for{violet}, # boolean type (true) + false => $code_for{violet}, # boolean type (false) repeated => $code_for{pink}, # references to seen values caller_info => $code_for{grey}, # details on what's being printed weak => $code_for{green}, # weak references flag diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Theme/Solarized.pm new/Data-Printer-1.002001/lib/Data/Printer/Theme/Solarized.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Theme/Solarized.pm 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Theme/Solarized.pm 2024-01-17 22:20:05.000000000 +0100 @@ -38,8 +38,10 @@ vstring => $code_for{base1}, # version strings (v5.16.0, etc) lvalue => $code_for{green}, # lvalue label format => $code_for{green}, # format type - repeated => $code_for{red}, # references to seen values - caller_info => $code_for{cyan}, # details on what's being printed + true => $code_for{blue}, # boolean type (true) + false => $code_for{blue}, # boolean type (false) + repeated => $code_for{red}, # references to seen values + caller_info => $code_for{cyan}, # details on what's being printed weak => $code_for{violet}, # weak references flag tainted => $code_for{violet}, # tainted flag unicode => $code_for{magenta}, # utf8 flag diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer/Theme.pm new/Data-Printer-1.002001/lib/Data/Printer/Theme.pm --- old/Data-Printer-1.001001/lib/Data/Printer/Theme.pm 2022-11-22 04:24:48.000000000 +0100 +++ new/Data-Printer-1.002001/lib/Data/Printer/Theme.pm 2024-01-17 21:49:05.000000000 +0100 @@ -228,6 +228,8 @@ vstring => '#aabbcc', # version strings (v5.30.1, etc) lvalue => '#aabbcc', # lvalue label format => '#aabbcc', # format type + true => '#aabbcc', # boolean type (true) + false => '#aabbcc', # boolean type (false) repeated => '#aabbcc', # references to seen values caller_info => '#aabbcc', # details on what's being printed weak => '#aabbcc', # weak references flag diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/lib/Data/Printer.pm new/Data-Printer-1.002001/lib/Data/Printer.pm --- old/Data-Printer-1.001001/lib/Data/Printer.pm 2023-07-30 05:41:58.000000000 +0200 +++ new/Data-Printer-1.002001/lib/Data/Printer.pm 2024-01-18 01:47:16.000000000 +0100 @@ -5,7 +5,7 @@ use Data::Printer::Common; use Data::Printer::Config; -our $VERSION = '1.001001'; +our $VERSION = '1.002001'; $VERSION = eval $VERSION; my $rc_arguments; @@ -484,7 +484,7 @@ You can pass custom options that will work only on that particular call: - p @var, as => "some label", colorized => 0; + p @var, as => "some label", colored => 0; p %var, show_memsize => 1; By default, C<p()> prints to STDERR and returns the same variable being @@ -790,7 +790,7 @@ p my @array = qw(a b c d); # wrong my @array = qw(a b c d); p @array; # right -If you pass a nonexistant key/index to DDP using prototypes, they +If you pass a nonexistent key/index to DDP using prototypes, they will trigger autovivification: use DDP; @@ -1099,15 +1099,15 @@ patches, bug reports, wishlists, comments and tests. They are (alphabetically): Adam Rosenstein, Alexandr Ciornii (chorny), Alexander Hartmaier (abraxxa), -Allan Whiteford, Anatoly (Snelius30), Andreas König (andk), Andy Bach, -Anthony DeRobertis, Ãrpád Szász, Athanasios Douitsis (aduitsis), +Allan Whiteford, Anatoly (Snelius30), Andre Klärner, Andreas König (andk), +Andy Bach, Anthony DeRobertis, Ãrpád Szász, Athanasios Douitsis (aduitsis), Baldur Kristinsson, Benct Philip Jonsson (bpj), brian d foy, Chad Granum (exodist), Chris Prather (perigrin), Curtis Poe (Ovid), David D Lowe (Flimm), David E. Condon (hhg7), David Golden (xdg), David Precious (bigpresh), David Raab, David E. Wheeler (theory), Damien Krotkine (dams), Denis Howe, dirk, Dotan Dimet, Eden Cardim (edenc), Elliot Shank (elliotjs), Elvin Aslanov, Eugen Konkov (KES777), -Fernando Corrêa (SmokeMachine), Fitz Elliott, Florian (fschlich), +Fernando Corrêa (SmokeMachine), Fitz Elliott, Florian Schlichting (fschlich), Frew Schmidt (frew), GianniGi, Graham Knop (haarg), Graham Todd, Gregory J. Oschwald, grr, HÃ¥kon Hægland, Iaroslav O. Kosmina (darviarush), Ivan Bessarabov (bessarabv), J Mash, James E. Keenan (jkeenan), @@ -1134,7 +1134,7 @@ =head1 LICENSE AND COPYRIGHT -Copyright (C) 2011-2023 Breno G. de Oliveira +Copyright (C) 2011-2024 Breno G. de Oliveira This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Printer-1.001001/t/002-scalar.t new/Data-Printer-1.002001/t/002-scalar.t --- old/Data-Printer-1.001001/t/002-scalar.t 2021-03-09 02:38:08.000000000 +0100 +++ new/Data-Printer-1.002001/t/002-scalar.t 2024-01-17 22:58:12.000000000 +0100 @@ -2,11 +2,12 @@ # ^^ taint mode must be on for taint checking. use strict; use warnings; -use Test::More tests => 67; +use Test::More tests => 72; use Data::Printer::Object; use Scalar::Util; test_basic_values(); +test_boolean_values(); test_tainted_values(); test_unicode_string(); test_escape_chars(); @@ -57,6 +58,23 @@ is $object->parse(\$var), '123', 'integer 123 in variable'; } +sub test_boolean_values { + SKIP: { + skip 'booleans only exist after 5.36', 5 unless $] ge '5.036000'; + my $object = Data::Printer::Object->new( colored => 0 ); + my $var = 1 == 1; + is $object->parse(\$var), 'true', 'boolean true is "true"'; + $var = 1 == 2; + is $object->parse(\$var), 'false', 'boolean false is "false"'; + $var = 1; + is $object->parse(\$var), '1', '1 is 1, not "true"'; + $var = ''; + is $object->parse(\$var), '""', 'empty string is "", not "false"'; + $var = 0; + is $object->parse(\$var), '0', '0 is 0, not "false"'; + }; +} + sub test_tainted_values { SKIP: { # only use 1 char substring to avoid leaking