From 507ca219b48fdf0b0ce6275c0412629e3266b5a7 Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Wed, 21 Jan 2015 16:13:30 +0100
Subject: [PATCH] Cluster/Sentinel test: pause on exceptions as well.

---
 tests/cluster/run.tcl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/tests/cluster/run.tcl b/tests/cluster/run.tcl
index 69a160c4f..f764cea0a 100644
--- a/tests/cluster/run.tcl
+++ b/tests/cluster/run.tcl
@@ -21,6 +21,7 @@ proc main {} {
 
 if {[catch main e]} {
     puts $::errorInfo
+    if {$::pause_on_error} pause_on_error
     cleanup
     exit 1
 }