X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=blobdiff_plain;f=lib%2FLexical%2FTypes.pm;fp=lib%2FLexical%2FTypes.pm;h=aa3f0135adda4c850285f0269308149f8751ab74;hp=531e0e82cf5c219e914564ca6c03d88b470ea9bf;hb=cd9545fb411da4e5b69ad7fd2f43f8ea879d3ee3;hpb=23c7f5b6ae98a9f7f1d9ef3384f11eb884a764bd;ds=sidebyside diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm index 531e0e8..aa3f013 100644 --- a/lib/Lexical/Types.pm +++ b/lib/Lexical/Types.pm @@ -165,6 +165,8 @@ sub import { $^H |= 0x020000; $^H{+(__PACKAGE__)} = $hint; + + return; } =head2 C @@ -179,6 +181,8 @@ Turns the pragma off. sub unimport { $^H |= 0x020000; $^H{+(__PACKAGE__)} = undef; + + return; } =head1 RUN-TIME INITIALIZER METHOD