attributes are chained

Signed-off-by: franck cuny <franck@lumberjaph.net>

4 files changed, 5 insertions, 0 deletions

diff --git a/lib/Graph/GEXF/Role/Viz/Color.pm b/lib/Graph/GEXF/Role/Viz/Color.pm
index e168ad1..d7c30f1 100644
--- a/lib/Graph/GEXF/Role/Viz/Color.pm
+++ b/lib/Graph/GEXF/Role/Viz/Color.pm
@@ -13,12 +13,14 @@ has [qw/r g b/] => (
     isa     => 'RGBColor',
     default => 0,
     trigger => sub {$_has_colors++},
+    traits  => ['Chained'],
 );
 
 has a => (
     is      => 'rw',
     isa     => 'Alpha',
     default => 1,
+    traits  => ['Chained'],
 );
 
 sub has_colors { $_has_colors }
diff --git a/lib/Graph/GEXF/Role/Viz/Position.pm b/lib/Graph/GEXF/Role/Viz/Position.pm
index c15fd57..c9e79c3 100644
--- a/lib/Graph/GEXF/Role/Viz/Position.pm
+++ b/lib/Graph/GEXF/Role/Viz/Position.pm
@@ -8,6 +8,7 @@ has [qw/x y z/] => (
     is      => 'rw',
     isa     => 'Num',
     trigger => sub { $_has_position++ },
+    traits  => ['Chained'],
 );
 
 sub has_position { $_has_position }
diff --git a/lib/Graph/GEXF/Role/Viz/Shape.pm b/lib/Graph/GEXF/Role/Viz/Shape.pm
index 1f0ba67..b092d6d 100644
--- a/lib/Graph/GEXF/Role/Viz/Shape.pm
+++ b/lib/Graph/GEXF/Role/Viz/Shape.pm
@@ -29,6 +29,7 @@ role {
         is      => 'rw',
         isa     => $type,
         default => $default,
+        traits  => ['Chained'],
     );
 };
 
diff --git a/lib/Graph/GEXF/Role/Viz/Size.pm b/lib/Graph/GEXF/Role/Viz/Size.pm
index d192db6..aef1574 100644
--- a/lib/Graph/GEXF/Role/Viz/Size.pm
+++ b/lib/Graph/GEXF/Role/Viz/Size.pm
@@ -14,6 +14,7 @@ role {
         is      => 'rw',
         isa     => 'Num',
         default => '1.0',
+        traits  => ['Chained'],
     );
 };