X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Fsynopsis.pl;h=41c22956b770488b2b357319e8d021936493c97f;hb=0fb9961e1a5172180e428b49f67e2120835c9e3c;hp=892e8bb0966b92a3ca0fb853d78298613023cec9;hpb=f7b9f0d8c8d037ecb36c4d77aba3e7f202312f16;p=perl%2Fmodules%2FLaTeX-TikZ.git

diff --git a/samples/synopsis.pl b/samples/synopsis.pl
index 892e8bb..41c2295 100644
--- a/samples/synopsis.pl
+++ b/samples/synopsis.pl
@@ -9,7 +9,7 @@ use LaTeX::TikZ;
 
 # A couple of lines
 my $hline = Tikz->line(-1 => 1);
-my $vline = Tikz->line([ 0, -1 ] => [ 0, -1 ]);
+my $vline = Tikz->line([ 0, -1 ] => [ 0, 1 ]);
 
 # Paint them in red
 $_->mod(Tikz->color('red')) for $hline, $vline;
@@ -27,7 +27,7 @@ $octo->clip(Tikz->rectangle(-0.5*(1+i), 2*(1+i)));
 $octo->mod(Tikz->pattern(class => 'Dots'));
 
 # Create a formatter object
-my $tikz = Tikz->formatter;
+my $tikz = Tikz->formatter(scale => 5);
 
 # Put those objects all together and print them
 my $seq = Tikz->seq($octo, $hline, $vline);