1 files changed, 2 insertions, 2 deletions
diff --git a/pp.c b/pp.c
index e4da3d2c42..47cf756a07 100644
--- a/pp.c
+++ b/pp.c
@@ -4712,8 +4712,8 @@ PP(pp_rkeys)
     }
 
     if ( SvTYPE(sv) != SVt_PVHV && SvTYPE(sv) != SVt_PVAV ) {
-	DIE(aTHX_ Perl_form(aTHX_ "Type of argument to %s must be hashref or arrayref",
-	    PL_op_desc[PL_op->op_type] ));
+	DIE(aTHX_ "Type of argument to %s must be hashref or arrayref",
+	    PL_op_desc[PL_op->op_type] );
     }
 
     /* Delegate to correct function for op type */