Permalink
Browse files

Cleanup Version .parts handling a bit.

  • Loading branch information...
1 parent 95dfc00 commit 499cc68bd727df3ac52405645e833255e356858e @pmichaud pmichaud committed Jul 12, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/core/Version.pm
View
@@ -50,8 +50,8 @@ multi sub infix:<cmp>(Version:D $a, Version:D $b) {
multi vnumcmp(Int, Str) { Order::Decrease }
multi vnumcmp($av, $bv) { $av cmp $bv }
- my @av = ($a.parts,).flat;
- my @bv = ($b.parts,).flat;
+ my @av = $a.parts.values;
+ my @bv = $b.parts.values;
while @av || @bv {
my $cmp = vnumcmp(@av.shift // 0, @bv.shift // 0);
return $cmp if $cmp != Order::Same;

0 comments on commit 499cc68

Please sign in to comment.