Patch for bug 238693: replace depreciated v-strings with calls to the pack() function...

diff --git a/checksetup.pl b/checksetup.pl
index 6d2c79189dd4c018acb3db7f6573ba7bf9135078..f2e14bf347390e1bb7cf2ff19df7e9805ea43934 100755 (executable)
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -313,7 +313,7 @@ my $patchreader = have_vers("PatchReader",0);
 print "\n" unless $silent;
 
 if ($^O =~ /MSWin32/i) {
-    if ($^V lt v5.8.0) {
+    if ($^V lt pack('U*',5,8,0)) {
         print "The required ActivePerl modules are available at OpenInteract's ppm repository.\n";
         print "You can add the repository with the following command:\n";
         print "    ppm rep add oi http://openinteract.sourceforge.net/ppmpackages/\n\n";