Bug 4699 fixed.
[scilab.git] / scilab / modules / development_tools / src / perl / xml2test / xml2test.pl
index f2b0f10..0785b7c 100644 (file)
@@ -22,6 +22,7 @@ my $directory = getcwd();
 if( dirname($0) ne '.' )
 {
        $directory .= '/'.dirname($0);
+       $directory =~ s/\/\.\//\//g;
 }
 
 if( dirname($0) =~ m/^\// )