Correct misleading error message

Message-Id: <E16P6XZ-0005kA-00@draco.cus.cam.ac.uk>

hash assignment -> anonymous hash

p4raw-id: //depot/perl@14200

1 files changed, 1 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index 8b58c167a4..319adafc7e 100644
--- a/pp.c
+++ b/pp.c
@@ -3848,7 +3848,7 @@ PP(pp_anonhash)
 	if (MARK < SP)
 	    sv_setsv(val, *++MARK);
 	else if (ckWARN(WARN_MISC))
-	    Perl_warner(aTHX_ WARN_MISC, "Odd number of elements in hash assignment");
+	    Perl_warner(aTHX_ WARN_MISC, "Odd number of elements in anonymous hash");
 	(void)hv_store_ent(hv,key,val,0);
     }
     SP = ORIGMARK;