summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2019-11-04 22:27:39 -0700
committerKarl Williamson <khw@cpan.org>2019-11-06 21:22:25 -0700
commit58aa673865ea7e8aaee4b242ff4885eac1ee1334 (patch)
tree7785daa1b8aff52130a3e14f20430fac711ce45a /doop.c
parentbf6e464fb44457ed714ead27ebf49a5a627a99ae (diff)
downloadperl-58aa673865ea7e8aaee4b242ff4885eac1ee1334.tar.gz
Remove swashes from core
Also references to the term.
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doop.c b/doop.c
index 3cb1354540..5ac79420b0 100644
--- a/doop.c
+++ b/doop.c
@@ -391,7 +391,7 @@ S_do_trans_invmap(pTHX_ SV * const sv, AV * const invmap)
bool inplace = ! cBOOL(PL_op->op_private & OPpTRANS_GROWS);
const UV* from_array = invlist_array(from_invlist);
UV final_map;
- bool out_is_utf8 = SvUTF8(sv);
+ bool out_is_utf8 = cBOOL(SvUTF8(sv));
STRLEN s_len;
PERL_ARGS_ASSERT_DO_TRANS_INVMAP;