diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-12-25 14:24:42 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-12-25 15:54:53 -0700 |
commit | 8d56eeaba1f0cb755e32bc94a96998e1e9b8a1e4 (patch) | |
tree | cfed5675985fb421c78c706edbfb16ee745842f0 | |
parent | 13b03be875f7cff6c86906f8145d1c1e304819be (diff) | |
download | perl-8d56eeaba1f0cb755e32bc94a96998e1e9b8a1e4.tar.gz |
re/reg_fold.t: Use /u rules for Unicode tests
These tests are for Unicode, so should have /u (instead of /d).
-rw-r--r-- | t/re/reg_fold.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/re/reg_fold.t b/t/re/reg_fold.t index 50ccc88de0..45a28130d2 100644 --- a/t/re/reg_fold.t +++ b/t/re/reg_fold.t @@ -45,7 +45,7 @@ while (<$fh>) { } } $lhs = "\"$lhs\""; - $rhs = "/^$rhs\$/i"; + $rhs = "/^$rhs\$/iu"; # Try both Latin1 and Unicode for code points below 256 foreach my $upgrade ("", 'utf8::upgrade($c); ') { |