1 files changed, 3 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index 315c85b1a0..75b35a81ff 100644
--- a/sv.c
+++ b/sv.c
@@ -7130,7 +7130,9 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV
 
 	case 'c':
 	    uv = args ? va_arg(*args, int) : SvIVx(argsv);
-	    if ((uv > 255 || (!UNI_IS_INVARIANT(uv) || SvUTF8(sv))) && !IN_BYTE) {
+	    if ((uv > 255 ||
+		 (!UNI_IS_INVARIANT(uv) && SvUTF8(sv)))
+		&& !IN_BYTE) {
 		eptr = (char*)utf8buf;
 		elen = uvchr_to_utf8((U8*)eptr, uv) - utf8buf;
 		is_utf = TRUE;