From: Vincent Pit <vince@profvince.com>
Date: Wed, 24 Feb 2010 14:46:47 +0000 (+0100)
Subject: A 'CHECK' label is no longer accepter in 5.11
X-Git-Tag: v0.07~12
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=2f5d92f87c6d82ebf8d1adb61b857f0998170973;p=perl%2Fmodules%2Frgit.git

A 'CHECK' label is no longer accepter in 5.11
---

diff --git a/t/lib/App/Rgit/TestUtils.pm b/t/lib/App/Rgit/TestUtils.pm
index 07b1bd7..dcc8339 100644
--- a/t/lib/App/Rgit/TestUtils.pm
+++ b/t/lib/App/Rgit/TestUtils.pm
@@ -23,7 +23,7 @@ sub can_run_git {
 
  my @ret = (1, '');
 
-CHECK:
+TRY:
  {
   my @args = (
    abs_path($filename),
@@ -36,13 +36,13 @@ CHECK:
     $git .= '.bat';
     unless (-x $git) {
      @ret = (0, "no $git executable");
-     last CHECK;
+     last TRY;
     }
    }
   } else {
    unless (-x $git) {
     @ret = (0, "no $git executable");
-    last CHECK;
+    last TRY;
    }
   }
 
@@ -50,7 +50,7 @@ CHECK:
 
   if ($? == -1) {
    @ret = (0, $! || "unknown");
-   last CHECK;
+   last TRY;
   }
 
   my $status;