This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
pp_subst: fix typo
authorDavid Mitchell <davem@iabyn.com>
Wed, 2 Mar 2016 10:25:32 +0000 (10:25 +0000)
committerDavid Mitchell <davem@iabyn.com>
Wed, 2 Mar 2016 10:25:32 +0000 (10:25 +0000)
pp_hot.c

index 23e5d87..1a194a9 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2928,7 +2928,7 @@ PP(pp_subst)
 
     orig = SvPV_nomg(TARG, len);
     /* note we don't (yet) force the var into being a string; if we fail
-     * to match, we leave as-is; on successful match howeverm, we *will*
+     * to match, we leave as-is; on successful match however, we *will*
      * coerce into a string, then repeat the match */
     if (!SvPOKp(TARG) || SvTYPE(TARG) == SVt_PVGV || SvVOK(TARG))
        force_on_match = 1;