X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=blobdiff_plain;f=lib%2FLexical%2FTypes.pm;h=a3b285af561977209e7b55048f89c2f578e81476;hp=642d2ce1d6937fa3c54c917f08e7e79f62c64551;hb=46563a4451087c17e95a7ec9d33eb7ff0cc674d4;hpb=1a019acca86cfa85a067bd85249fa5981f6e13a8

diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm
index 642d2ce..a3b285a 100644
--- a/lib/Lexical/Types.pm
+++ b/lib/Lexical/Types.pm
@@ -114,7 +114,9 @@ If the value given is a code reference C<$mangler>, it will be called at compile
 
 either an empty list, in which case the current typed lexical definition will be skipped (thus it won't be altered to trigger a run-time hook) ;
 
-    use Lexical::Types as => sub { return $_[0] =~ /Str/ ? @_ : () };
+    use Lexical::Types as => sub {
+     return $_[0] =~ /Str/ ? @_ : ()
+    };
     my Str $y; # calls Str->TYPEDSCALAR
     my Int $x; # nothing special