X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a77b8884fa58cf932bad343ff7141233d088b95d..e76439140a3c6fcd2e65ba5d6ef7ae1e4268f5a7:/tools/simgrid_update_xml.pl

diff --git a/tools/simgrid_update_xml.pl b/tools/simgrid_update_xml.pl
index 171bdc2db3..2ca57b959b 100755
--- a/tools/simgrid_update_xml.pl
+++ b/tools/simgrid_update_xml.pl
@@ -1,7 +1,7 @@
 #! /usr/bin/perl
 
 # This script updates the simgrid XML file passed as argument (modification in place)
-# It is built to do the conversion incrementally (even if for now, only 2 versions are defined)
+# It is built to do the conversion incrementally.
 
 # Copyright (C) 2006-2010. The SimGrid team. All rights reserved.
 #
@@ -72,12 +72,12 @@ while (defined($line = <INPUT>)) {
     }
     
     if ($fromversion < 3)  {
-	if($line =~ /^(.*)<\/platform>(.*)$/) {
-	    $output_string .=  " <\/AS>\n<\/platform>";
-	} else {
-	    $output_string .=  "$line\n";
-	}
+	$line =~ s/\blink:ctn\b/link_ctn/g;
+	$line =~ s/\btrace:connect\b/trace_connect/g;
+	$line =~ s/^(.*)<\/platform>(.*)$/ <\/AS>\n<\/platform>/;
     }
+
+    $output_string .= "$line\n";
 }
 
 close INPUT;