diff options
Diffstat (limited to 'MDK')
| -rw-r--r-- | MDK/Common/Func.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MDK/Common/Func.pm b/MDK/Common/Func.pm index bc34fce..3e8285d 100644 --- a/MDK/Common/Func.pm +++ b/MDK/Common/Func.pm @@ -258,7 +258,7 @@ sub add_f4before_leaving { *N = sub { my $f = $list->{$_[0]}{$name} or die ''; $name eq 'DESTROY' and delete $list->{$_[0]}; - goto $f; + &$f; } unless defined &{*N}; } |