Make LT::Set::Path the base role, remove ::Op, and rename the old ::Path to ::Union

[perl/modules/LaTeX-TikZ.git] / lib / LaTeX / TikZ / Set / Sequence.pm

diff --git a/lib/LaTeX/TikZ/Set/Sequence.pm b/lib/LaTeX/TikZ/Set/Sequence.pm
index afdc313813eaf7fea53e563d86db6b898a02f75c..c4531218aec1c135e8143ec47ebed45cfdf84aa0 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Sequence.pm
+++ b/lib/LaTeX/TikZ/Set/Sequence.pm
@@ -24,7 +24,7 @@ use LaTeX::TikZ::Functor;
 
 use Any::Moose;
 use Any::Moose 'Util::TypeConstraints'
-               => [ qw/subtype as where find_type_constraint/ ];
+               => [ qw<subtype as where find_type_constraint> ];
 
 =head1 RELATIONSHIPS
 
@@ -32,15 +32,15 @@ This class consumes the L<LaTeX::TikZ::Set> and L<LaTeX::TikZ::Set::Mutable> rol
 
 =cut
 
-with qw(
+with qw<
  LaTeX::TikZ::Set
  LaTeX::TikZ::Set::Mutable
-);
+>;
 
 subtype 'LaTeX::TikZ::Set::Sequence::Elements'
      => as 'Object'
      => where {
-             $_->does('LaTeX::TikZ::Set::Op')
+             $_->does('LaTeX::TikZ::Set::Path')
           or $_->isa('LaTeX::TikZ::Set::Sequence')
      };
 
@@ -48,7 +48,7 @@ subtype 'LaTeX::TikZ::Set::Sequence::Elements'
 
 =head2 C<kids>
 
-The L<LaTeX::TikZ::Set::Op> or L<LaTeX::TikZ::Set::Sequence> objects that from the sequence.
+The L<LaTeX::TikZ::Set::Path> or L<LaTeX::TikZ::Set::Sequence> objects that from the sequence.
 
 =cut
 
@@ -113,7 +113,7 @@ __PACKAGE__->meta->make_immutable;
 
 =head1 SEE ALSO
 
-L<LaTeX::TikZ>, L<LaTeX::TikZ::Set::Op>, L<LaTeX::TikZ::Set::Mutable>.
+L<LaTeX::TikZ>, L<LaTeX::TikZ::Set::Path>, L<LaTeX::TikZ::Set::Mutable>.
 
 =head1 AUTHOR