1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 28e552b2fb..0c803d44c7 100644
--- a/toke.c
+++ b/toke.c
@@ -2864,7 +2864,7 @@ Perl_yylex(pTHX)
 		if (*s == '(' && ckWARN(WARN_AMBIGUOUS))
 		    Perl_warner(aTHX_ WARN_AMBIGUOUS,
 				"Ambiguous -%c() resolved as a file test",
-				tmp, tmp);
+				tmp);
 		FTST(ftst);
 	    }
 	    else {