Bump up version numbers.

[perl5.git] / utf8.c

diff --git a/utf8.c b/utf8.c
index 1c1a5d4..5a5f56c 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -428,7 +428,7 @@ malformed:
 
            if (PL_op)
                Perl_warner(aTHX_ WARN_UTF8,
-                           "%s in %s", s,  PL_op_desc[PL_op->op_type]);
+                           "%s in %s", s,  OP_DESC(PL_op));
            else
                Perl_warner(aTHX_ WARN_UTF8, "%s", s);
        }