summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/meta_notation.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/meta_notation.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/meta_notation.pm1
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;