1 files changed, 3 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index 90a4e0d8fd..807e63c864 100644
--- a/sv.c
+++ b/sv.c
@@ -4047,6 +4047,9 @@ sv_2cv(SV *sv, HV **st, GV **gvp, I32 lref)
 	if (SvGMAGICAL(sv))
 	    mg_get(sv);
 	if (SvROK(sv)) {
+	    SV **sp = &sv;		/* Used in tryAMAGICunDEREF macro. */
+	    tryAMAGICunDEREF(to_cv);
+
 	    cv = (CV*)SvRV(sv);
 	    if (SvTYPE(cv) != SVt_PVCV)
 		croak("Not a subroutine reference");