From 486ec47ab73770ab60bf9cfb6d398a4371463266 Mon Sep 17 00:00:00 2001 From: "Peter J. Acklam) (via RT" Date: Thu, 6 Jan 2011 23:13:56 -0800 Subject: Fix typos (spelling errors) in Perl sources. # New Ticket Created by (Peter J. Acklam) # Please include the string: [perl #81904] # in the subject line of all future correspondence about this issue. # Signed-off-by: Abigail --- op.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'op.c') diff --git a/op.c b/op.c index f7c8d71f95..339418c726 100644 --- a/op.c +++ b/op.c @@ -6000,7 +6000,7 @@ Perl_cv_const_sv(pTHX_ const CV *const cv) * cv && CvCONST(cv) * * We have just cloned an anon prototype that was marked as a const - * candidiate. Try to grab the current value, and in the case of + * candidate. Try to grab the current value, and in the case of * PADSV, ignore it if it has multiple references. Return the value. */ @@ -7974,7 +7974,7 @@ Perl_ck_sassign(pTHX_ OP *o) other->op_targ = target; /* Because we change the type of the op here, we will skip the - assinment binop->op_last = binop->op_first->op_sibling; at the + assignment binop->op_last = binop->op_first->op_sibling; at the end of Perl_newBINOP(). So need to do it here. */ cBINOPo->op_last = cBINOPo->op_first->op_sibling; -- cgit v1.2.1