diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-21 09:20:56 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-21 09:20:56 +0000 |
| commit | 8cb289bd08361a8bd4bed96b220c3e5ea828821b (patch) | |
| tree | f1d0f18d727ce3d0edb927c4a0405fb13e0344f4 /t | |
| parent | c94dd5be9196e7fc999830ac8069b03bb8f510be (diff) | |
| download | perl-8cb289bd08361a8bd4bed96b220c3e5ea828821b.tar.gz | |
Upgrade to version-0.7203.
Plus a change in Module::Build::Version, specific to bleadperl.
p4raw-id: //depot/perl@31005
Diffstat (limited to 't')
| -rwxr-xr-x | t/comp/use.t | 6 | ||||
| -rwxr-xr-x | t/op/sprintf.t | 8 |
2 files changed, 7 insertions, 7 deletions
diff --git a/t/comp/use.t b/t/comp/use.t index 9df08d25df..e66c4a39b5 100755 --- a/t/comp/use.t +++ b/t/comp/use.t @@ -145,7 +145,7 @@ if ($^O eq 'MacOS') { is ($@, ''); eval "use lib 100.105"; - like ($@, qr/lib version 100.105 required--this is only version 35.360/); + like ($@, qr/lib version 100.105 required--this is only version 35.36/); local $lib::VERSION = '35.36'; eval "use lib v33.55"; @@ -158,7 +158,7 @@ if ($^O eq 'MacOS') { is ($@, ''); eval "use lib 100.105"; - like ($@, qr/lib version 100.105 required--this is only version 35.360/); + like ($@, qr/lib version 100.105 required--this is only version 35.36/); local $lib::VERSION = v35.36; eval "use lib v33.55"; @@ -171,7 +171,7 @@ if ($^O eq 'MacOS') { is ($@, ''); eval "use lib 100.105"; - like ($@, qr/lib version 100.105 required--this is only version 35.036000/); + like ($@, qr/lib version 100.105 required--this is only version v35.36/); } diff --git a/t/op/sprintf.t b/t/op/sprintf.t index 2b9c7bc153..c220946745 100755 --- a/t/op/sprintf.t +++ b/t/op/sprintf.t @@ -306,11 +306,11 @@ __END__ >%vd< >"\01\02\03"< >1.2.3< >%vd< >v1.2.3< >1.2.3< >%vd< >[version::qv("1.2.3")]< >1.2.3< ->%vd< >[version->new("1.2")]< >1.200< ->%vd< >[version->new("1.02")]< >1.20< +>%vd< >[version->new("1.2")]< >1.2< +>%vd< >[version->new("1.02")]< >1.2< >%vd< >[version->new("1.002")]< >1.2< ->%vd< >[version->new("1048576.5")]< >1048576.500< ->%vd< >[version->new("50")]< >50.0< +>%vd< >[version->new("1048576.5")]< >1048576.5< +>%vd< >[version->new("50")]< >50< >%v.3d< >"\01\02\03"< >001.002.003< >%0v3d< >"\01\02\03"< >001.002.003< >%v.3d< >[version::qv("1.2.3")]< >001.002.003< |