Fix appending to a Set::Mod

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

diff --git a/lib/LaTeX/TikZ/Set/Mod.pm b/lib/LaTeX/TikZ/Set/Mod.pm
index 8444fea9e9cda9cc95620e64864d849d99fd1f08..e98b98aecd579c4ada5ccaa10c52d355307f8927 100644 (file)
--- a/lib/LaTeX/TikZ/Set/Mod.pm
+++ b/lib/LaTeX/TikZ/Set/Mod.pm
@@ -69,7 +69,7 @@ sub add {
  } else {
   require LaTeX::TikZ::Set::Sequence;
   $set->_set(LaTeX::TikZ::Set::Sequence->new(
-   kids => $kid,
+   kids => [ $kid, @_ ],
   ));
  }