regcomp.c: /[[:lower:]]/i should match the same as /\p{Lower}/i

Same for [[:upper:]] and \p{Upper}.  These were matching instead all of
[[:alpha:]] or \p{Alpha}.  What /\p{Lower}/i and /\p{Upper}/i match instead
is \p{Cased}, and so that is what these should match.

1 files changed, 2 insertions, 0 deletions

diff --git a/sv.c b/sv.c
index f02627bf6e..214a17d44b 100644
--- a/sv.c
+++ b/sv.c
@@ -13398,6 +13398,8 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
     PL_PosixBlank	= sv_dup_inc(proto_perl->IPosixBlank, param);
     PL_XPosixBlank	= sv_dup_inc(proto_perl->IXPosixBlank, param);
 
+    PL_L1Cased		= sv_dup_inc(proto_perl->IL1Cased, param);
+
     PL_PosixCntrl	= sv_dup_inc(proto_perl->IPosixCntrl, param);
     PL_XPosixCntrl	= sv_dup_inc(proto_perl->IXPosixCntrl, param);