diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/meta_notation.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/meta_notation.pm | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/Master/tlpkg/tlperl/lib/meta_notation.pm b/Master/tlpkg/tlperl/lib/meta_notation.pm index eea85875c9f..e856bb950f0 100644 --- a/Master/tlpkg/tlperl/lib/meta_notation.pm +++ b/Master/tlpkg/tlperl/lib/meta_notation.pm @@ -42,7 +42,6 @@ sub _meta_notation ($) { $string =~ s/([\240-\377])/sprintf("M-%c" ,ord($1)&0177)/eg; } else { - no warnings 'experimental::regex_sets'; # Leave alone things above \xff $string =~ s/( (?[ [\x00-\xFF] & [:^print:]])) / sprintf("\\x{%X}", ord($1))/xaeg; |