From 15bc1cc1bcd4174e7116b5429f1f31f792d13d2e Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Sat, 25 Jun 2011 12:42:55 +0200
Subject: [PATCH] colorized test output shows scripting tests with X

---
 tests/support/test.tcl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/tests/support/test.tcl b/tests/support/test.tcl
index dff2d2976..a6199f4bd 100644
--- a/tests/support/test.tcl
+++ b/tests/support/test.tcl
@@ -80,6 +80,9 @@ proc colored_dot {tags passed} {
         } elseif {[lsearch $tags basic] != -1} {
             set colorcode {35}
             set ch B
+        } elseif {[lsearch $tags scripting] != -1} {
+            set colorcode {36}
+            set ch X
         } else {
             set colorcode {37}
             set ch .