projects
/
perl
/
modules
/
indirect.git
/ commitdiff
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
| inline |
side by side
(parent:
26219bd
)
A couple of cosmetic code changes
author
Vincent Pit <vince@profvince.com>
Sun, 23 Oct 2011 00:06:55 +0000 (
02:06
+0200)
committer
Vincent Pit <vince@profvince.com>
Sun, 23 Oct 2011 00:06:55 +0000 (
02:06
+0200)
lib/indirect.pm
patch
|
blob
|
history
diff --git
a/lib/indirect.pm
b/lib/indirect.pm
index
b0077c4
..
85353e2
100644
(file)
--- a/
lib/indirect.pm
+++ b/
lib/indirect.pm
@@
-145,7
+145,7
@@
sub unimport {
$^H{+(__PACKAGE__)} = _tag($hook);
}
-
()
;
+
return
;
}
=head2 C<import>
@@
-159,7
+159,8
@@
As explained in L</unimport>'s description, an C<use indirect> statement will le
sub import {
$^H |= 0x00020000;
$^H{+(__PACKAGE__)} = _tag(undef);
- ();
+
+ return;
}
=head1 FUNCTIONS