Commit e53a6242 authored by Maxime Perrotin's avatar Maxime Perrotin

Fix syntax error in TCL

parent 27b8089a
......@@ -162,8 +162,7 @@ namespace eval concurrencyview {
close $chan
::API::HMI::loadUI "$cvFilename" "concurrencyview"
return [list 0 ""]
}
else if { [file exists "work/build/system.aadl" ] } {
} elseif { [file exists "work/build/system.aadl" ] } {
File::delete "$cvFilename"
File::copy "work/build/system.aadl" "$cvFilename"
set chan [open "$cvFilename" a+ ]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment