diff options
-rw-r--r-- | lib/MDK/Common/Func.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/MDK/Common/Func.pm b/lib/MDK/Common/Func.pm index 12e8777..82811bb 100644 --- a/lib/MDK/Common/Func.pm +++ b/lib/MDK/Common/Func.pm @@ -258,8 +258,7 @@ sub find_index(&@) { $_ = $_[$i]; &$f and return $i; } - use Carp; - carp("find_index failed in @_") + die "find_index failed in @_"; } sub map_each(&%) { my ($f, %h) = @_; |