From: alegrand <alegrand@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Date: Tue, 2 Feb 2010 23:17:50 +0000 (+0000)
Subject: Work even when names have ":"
X-Git-Tag: SVN~686
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/9090866b26ed97615e1bd11a5f11d1293bac7d9d?ds=sidebyside

Work even when names have ":"

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@7047 48e7efb5-ca39-0410-a469-dd3cf9ba447f
---

diff --git a/tools/MSG_visualization/colorize.pl b/tools/MSG_visualization/colorize.pl
index 2c7cc4e048..498bab6472 100755
--- a/tools/MSG_visualization/colorize.pl
+++ b/tools/MSG_visualization/colorize.pl
@@ -88,7 +88,7 @@ while (<>) {
     $orgline = $thisline = $_;
 
     # Typical line  [Gatien:slave:(9) 11.243148] msg/gos.c:137: [msg_gos/DEBUG] Action terminated
-    if ($thisline =~ /^\[([^:]+):([^:]+):\((\d+)\) ([\d\.]*)\] ([^\[]*) \[([^\[]*)\] (.*)$/) {
+    if ($thisline =~ /^\[(.+):([^:]+):\((\d+)\) ([\d\.]*)\] ([^\[]*) \[([^\[]*)\] (.*)$/) {
 	$host=$1;
 	$procname=$2;
 	$pid=$3;