Make sure import and unimport don't return anything

[perl/modules/Lexical-Types.git] / lib / Lexical / Types.pm

diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm
index 531e0e82cf5c219e914564ca6c03d88b470ea9bf..aa3f0135adda4c850285f0269308149f8751ab74 100644 (file)
--- a/lib/Lexical/Types.pm
+++ b/lib/Lexical/Types.pm
@@ -165,6 +165,8 @@ sub import {
 
  $^H |= 0x020000;
  $^H{+(__PACKAGE__)} = $hint;
+
+ return;
 }
 
 =head2 C<unimport>
@@ -179,6 +181,8 @@ Turns the pragma off.
 sub unimport {
  $^H |= 0x020000;
  $^H{+(__PACKAGE__)} = undef;
+
+ return;
 }
 
 =head1 RUN-TIME INITIALIZER METHOD