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

Reply via email to