Version object patch #1

Message-id: <3D5BB55D.6090603@rowman.com>
and Message-id: <3D627D1A.4050607@rowman.com>
and t/lib/warnings/universal tweak to skip

p4raw-id: //depot/perl@17746

1 files changed, 1 insertions, 1 deletions

diff --git a/toke.c b/toke.c
index 6bacaeaf93..f0f15b9ddc 100644
--- a/toke.c
+++ b/toke.c
@@ -7435,7 +7435,7 @@ Perl_scan_num(pTHX_ char *start, YYSTYPE* lvalp)
     case 'v':
 vstring:
 		sv = NEWSV(92,5); /* preallocate storage space */
-		s = new_vstring(s,sv);
+		s = scan_vstring(s,sv);
 	break;
     }