X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=gv.c;h=b8fef0d8b03dcdc3cb8ec3c2c792b63feab51440;hb=b66a344cd7dee153c0b0d0563e56c746d574dd5c;hp=acd85012e74c19d921e62e800e58dbd927916ed2;hpb=7e2040f0b7c6fc88ec07b6e169aa2f75fc0130a4;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/gv.c b/gv.c
index acd8501..b8fef0d 100644
--- a/gv.c
+++ b/gv.c
@@ -837,6 +837,7 @@ Perl_gv_fetchpv(pTHX_ const char *nambeg, I32 add, I32 sv_type)
     case '\017':	/* $^O */
     case '\020':	/* $^P */
     case '\024':	/* $^T */
+    case '\025':	/* $^U */
 	if (len > 1)
 	    break;
 	goto magicalize;