Typo in #6341.

p4raw-id: //depot/cfgperl@6356

diff --git a/pp_hot.c b/pp_hot.c
index 6df5420..742d0da 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2267,7 +2267,7 @@ S_get_db_sub(pTHX_ SV **svp, CV *cv)
                    && (gv = (GV*)*svp) ))) {
            /* Use GV from the stack as a fallback. */
            /* GV is potentially non-unique, or contain different CV. */
-           SV *tmp = newRV((SV*)cv));
+           SV *tmp = newRV((SV*)cv);
            sv_setsv(dbsv, tmp);
            SvREFCNT_dec(tmp);
        }