diff options
| author | Peter J. Acklam) (via RT <perlbug-followup@perl.org> | 2011-01-06 23:13:56 -0800 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2011-01-07 11:14:22 +0100 |
| commit | 486ec47ab73770ab60bf9cfb6d398a4371463266 (patch) | |
| tree | 74fc7e7969e5c694ddafafe589afec7694b69dc3 /pp_ctl.c | |
| parent | 7237a61d0477f17adcfed2690643e9c4b2dccaae (diff) | |
| download | perl-486ec47ab73770ab60bf9cfb6d398a4371463266.tar.gz | |
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.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=81904 >
Signed-off-by: Abigail <abigail@abigail.be>
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -111,7 +111,7 @@ PP(pp_regcomp) if (PL_op->op_flags & OPf_STACKED) { - /* multiple args; concatentate them */ + /* multiple args; concatenate them */ dMARK; dORIGMARK; tmpstr = PAD_SV(ARGTARG); sv_setpvs(tmpstr, ""); @@ -3998,7 +3998,7 @@ PP(pp_entereval) } return DOCATCH(PL_eval_start); } else { - /* We have already left the scope set up earler thanks to the LEAVE + /* We have already left the scope set up earlier thanks to the LEAVE in doeval(). */ if (was != PL_breakable_sub_gen /* Some subs defined here. */ ? (PERLDB_LINE || PERLDB_SAVESRC) @@ -5174,7 +5174,7 @@ S_run_user_filter(pTHX_ int idx, SV *buf_sv, int maxlen) if (take) { sv_catpvn(buf_sv, cache_p, take); sv_chop(cache, cache_p + take); - /* Definately not EOF */ + /* Definitely not EOF */ return 1; } |