diff options
Diffstat (limited to 'Master/tlpkg/tlperl/site/lib/URI/Escape.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/site/lib/URI/Escape.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl/site/lib/URI/Escape.pm b/Master/tlpkg/tlperl/site/lib/URI/Escape.pm index 30f2b312755..f9392d446fe 100644 --- a/Master/tlpkg/tlperl/site/lib/URI/Escape.pm +++ b/Master/tlpkg/tlperl/site/lib/URI/Escape.pm @@ -181,6 +181,7 @@ sub _fail_hi { sub uri_escape_utf8 { my $text = shift; + return undef unless defined $text; utf8::encode($text); return uri_escape($text, @_); } |