Really allow coercing a string into a mod object

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

diff --git a/lib/LaTeX/TikZ/Mod.pm b/lib/LaTeX/TikZ/Mod.pm
index dbee13dbeef4db32039a8cdde8de9661b120c311..b5921e9bcd3199d79b662e84a1481804e56af81c 100644 (file)
--- a/lib/LaTeX/TikZ/Mod.pm
+++ b/lib/LaTeX/TikZ/Mod.pm
@@ -27,7 +27,7 @@ requires qw(
 
 coerce 'LaTeX::TikZ::Mod'
     => from 'Str'
-    => via { LaTeX::TikZ::Mod::Raw->new($_) };
+    => via { LaTeX::TikZ::Mod::Raw->new(content => $_) };
 
 =head1 AUTHOR