Correct typo in code example.

[perl5.git] / pod / perlunicode.pod

diff --git a/pod/perlunicode.pod b/pod/perlunicode.pod
index 95db7ac..0482d92 100644 (file)
--- a/pod/perlunicode.pod
+++ b/pod/perlunicode.pod
@@ -1403,7 +1403,7 @@ the C<"non_unicode"> warning class has been made fatal, say by:
 
  use warnings FATAL => "non_unicode"
 
-(see L<perllexwarn>).  In this mode of operation, Perl will raise the
+(see L<warnings>).  In this mode of operation, Perl will raise the
 warning for all matches against a non-Unicode code point (not just the
 arguable ones), and it skips the optimizations that might cause the
 warning to not be output.  (It currently still won't warn if the match
@@ -1701,7 +1701,7 @@ are valid UTF-8.
 
 =item *
 
-C<is_utf8_char_buf(buf, buf_end)> returns true if the pointer points to
+C<isUTF8_CHAR(buf, buf_end)> returns true if the pointer points to
 a valid UTF-8 character.
 
 =item *