From 543875e6386163a967b8058f4bb8d541ccd63def Mon Sep 17 00:00:00 2001
From: Carlos Salguero <carlos.salguero@percona.com>
Date: Wed, 16 May 2018 23:09:02 -0300
Subject: [PATCH] PT-1554 Updated a slow test

---
 t/pt-online-schema-change/slave_lag.t | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/t/pt-online-schema-change/slave_lag.t b/t/pt-online-schema-change/slave_lag.t
index c57d7a44..98fcd711 100644
--- a/t/pt-online-schema-change/slave_lag.t
+++ b/t/pt-online-schema-change/slave_lag.t
@@ -19,7 +19,11 @@ use Sandbox;
 use SqlModes;
 use File::Temp qw/ tempdir /;
 
-plan tests => 4;
+if (!$ENV{PERCONA_SLOW_BOX}) {
+    plan skip_all => 'This test needs a fast machine';
+} else {
+    plan tests => 4;
+}
 our $delay = 30;
 
 my $tmp_file = File::Temp->new();