diff options
Diffstat (limited to 'lib/MDK/Common')
| -rw-r--r-- | lib/MDK/Common/Func.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MDK/Common/Func.pm b/lib/MDK/Common/Func.pm index cccaadc..b78ebc4 100644 --- a/lib/MDK/Common/Func.pm +++ b/lib/MDK/Common/Func.pm @@ -189,7 +189,7 @@ sub if_($@) { sub if__($@) { my $b = shift; defined $b or return (); - wantarray() || @_ <= 1 or die("if_ called in scalar context with more than one argument " . join(":", caller())); + wantarray() || @_ <= 1 or die("if__ called in scalar context with more than one argument " . join(":", caller())); wantarray() ? @_ : $_[0]; } |