Browse files

i think this shorter idiom will work

  • Loading branch information...
1 parent 8cc5b10 commit d9275f5ff4a261e22413c294c73968baa56bc600 @beppu committed Feb 7, 2011
Showing with 1 addition and 2 deletions.
  1. +1 −2 lib/Squatting.pm
View
3 lib/Squatting.pm
@@ -28,8 +28,7 @@ sub import {
my $p = (caller)[0];
if ($m ne 'Squatting') {
- $m->load_components(grep /::/, @_) if (@_);
- return;
+ return $m->load_components(grep /::/, @_);
}
push @{$p.'::ISA'}, 'Squatting';

0 comments on commit d9275f5

Please sign in to comment.