]> git.vpit.fr Git - perl/modules/LaTeX-TikZ.git/blobdiff - t/02-autocoerce.t
Preserve __PACKAGE__ from stringification by =>
[perl/modules/LaTeX-TikZ.git] / t / 02-autocoerce.t
index 86d49ccacf35b50540db56b795a88733b86696c2..39ab616c394f4dddbda2ec202982867cca192627 100644 (file)
@@ -108,7 +108,7 @@ use LaTeX::TikZ::Meta::TypeConstraint::Autocoerce;
   coerce   => 1,
  );
 
- __PACKAGE__->meta->make_immutable;
+ __PACKAGE__->meta->make_immutable if any_moose() ne 'Moose';
 
  sub main::Z () { __PACKAGE__ }
 }
@@ -126,7 +126,7 @@ use LaTeX::TikZ::Meta::TypeConstraint::Autocoerce;
  );
 
  coerce 'LaTeX::TikZ::TestX::Autocoerce'
-     => from __PACKAGE__
+     => from +(__PACKAGE__)
      => via { $_->x };
 
  __PACKAGE__->meta->make_immutable;