Skip to content

Commit a3319b9

Browse files
thibaultduponchelleerichermanbook
committed
cpan/parent - Update to version 0.243
0.243 2024-11-27 . Reinstate test for apostrophe as package separator, as the package separator is allowed again . No code change, only tests have been amended co-authored-by: Eric Herman <eric@freesa.org> co-authored-by: Philippe Bruhat (BooK) <book@cpan.org>
1 parent f177882 commit a3319b9

File tree

3 files changed

+10
-13
lines changed

3 files changed

+10
-13
lines changed

Porting/Maintainers.pl

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -885,8 +885,8 @@ package Maintainers;
885885
},
886886

887887
'parent' => {
888-
'DISTRIBUTION' => 'CORION/parent-0.242.tar.gz',
889-
'SYNCINFO' => 'jkeenan on Wed Aug 14 21:41:51 2024',
888+
'DISTRIBUTION' => 'CORION/parent-0.243.tar.gz',
889+
'SYNCINFO' => 'tib on Wed Dec 4 17:52:22 2024',
890890
'FILES' => q[cpan/parent],
891891
'EXCLUDED' => [
892892
qr{^xt}

cpan/parent/lib/parent.pm

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
package parent;
22
use strict;
33

4-
our $VERSION = '0.242_001';
4+
our $VERSION = '0.243';
55

66
sub import {
77
my $class = shift;

cpan/parent/t/compile-time-file.t

Lines changed: 7 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,7 @@ use lib 't/lib';
2424

2525
{
2626
package Child3;
27-
use if $] != 5.041_003, parent => "Dummy'Outside";
27+
use parent "Dummy'Outside";
2828
}
2929

3030
my $obj = {};
@@ -39,12 +39,9 @@ isa_ok $obj, 'Dummy::InlineChild';
3939
can_ok $obj, 'exclaim';
4040
is $obj->exclaim, "I CAN FROM Dummy::InlineChild", 'Inheritance is set up correctly for inlined classes';
4141

42-
SKIP:
43-
{
44-
skip "No ' in names in 5.041_003", 3 if $] == 5.041_003;
45-
$obj = {};
46-
bless $obj, 'Child3';
47-
isa_ok $obj, 'Dummy::Outside';
48-
can_ok $obj, 'exclaim';
49-
is $obj->exclaim, "I CAN FROM Dummy::Outside", "Inheritance is set up correctly for classes inherited from via '";
50-
}
42+
$obj = {};
43+
bless $obj, 'Child3';
44+
isa_ok $obj, 'Dummy::Outside';
45+
can_ok $obj, 'exclaim';
46+
is $obj->exclaim, "I CAN FROM Dummy::Outside", "Inheritance is set up correctly for classes inherited from via '";
47+

0 commit comments

Comments
 (0)