commit 5a9c09f2f7e50122bb2d56ded80b2142a1439ba6 · pyrox.dev/nixpkgs

+20

pkgs/development/perl-modules/Exception-Base-remove-smartmatch-when-5.38.0.patch

···

       1
       1
       +
       smartmatch deprecated in perl-5.37.10

     

       2
       2
       +
       

     

       3
       3
       +
       Patch by @pghmcfc from

     

       4
       4
       +
       https://github.com/dex4er/perl-Exception-Base/issues/5#issuecomment-1637075218

     

       5
       5
       +
       

     

       6
       6
       +
       diff --git a/t/tlib/Exception/BaseTest.pm b/t/tlib/Exception/BaseTest.pm

     

       7
       7
       +
       index d590d12..e531ed7 100644

     

       8
       8
       +
       --- a/t/tlib/Exception/BaseTest.pm

     

       9
       9
       +
       +++ b/t/tlib/Exception/BaseTest.pm

     

       10
       10
       +
       @@ -569,8 +569,9 @@ sub test_overload {

     

       11
       11
       +
            $self->assert_matches(qr/String at /, $obj);

     

       12
       12
       +
        

     

       13
       13
       +
            # smart matching for Perl 5.10

     

       14
       14
       +
       -    if ($] >= 5.010) {

     

       15
       15
       +
       +    # Deprecation warning added in 5.37.10

     

       16
       16
       +
       +    if ($] >= 5.010 && $] < 5.037010) {

     

       17
       17
       +
                no if $] >= 5.018, warnings => 'experimental::smartmatch';

     

       18
       18
       +
                eval q{

     

       19
       19
       +
                    $self->assert_num_equals(1, 'String' ~~ $obj);

     

       20
       20
       +

pkgs/top-level/perl-packages.nix

···

       8668
       8668
        
             hash = "sha256-VyPdePSsC00mKgXqRq9mPqANgJay6cCkNRXCEHYOHnU=";

     

       8669
       8669
        
           };

     

       8670
       8670
        
           buildInputs = [ TestUnitLite ];

     

       8671
       8671
       +
           patches = [

     

       8672
       8672
       +
             ../development/perl-modules/Exception-Base-remove-smartmatch-when-5.38.0.patch

     

       8673
       8673
       +
           ];

     

       8671
       8674
        
           meta = {

     

       8672
       8675
        
             description = "Lightweight exceptions";

     

       8673
       8676
        
             license = with lib.licenses; [ artistic1 gpl1Plus ];