afonso/core-extra
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

gui: Ask if the currently running session should be stopped when

Browse source 
loading a file.
This commit is contained in:
tgoff0@gmail.com 2014-12-15 18:22:40 +00:00
parent 761dc4fe27
commit b1c2f19cbe
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
trunk/gui/filemgmt.tcl
View file

@ -148,6 +148,10 @@ proc openFile {} {
global canvas_list curcanvas systype global canvas_list curcanvas systype
global changed global changed
if { [popupStopSessionPrompt] == "cancel" } {
return
}
if { [lindex [file extension $currentFile] 0] == ".py" } { if { [lindex [file extension $currentFile] 0] == ".py" } {
set flags 0x10 ;# status request flag set flags 0x10 ;# status request flag
sendRegMessage -1 $flags [list "exec" $currentFile] sendRegMessage -1 $flags [list "exec" $currentFile]