Critical bug fixed with create project
This commit is contained in:
parent
98de397ae9
commit
a3ea035df5
|
@ -473,7 +473,8 @@ proc OpenProj {nbNode} {
|
|||
|
||||
|
||||
proc AddNewProjectIntoTree {proj} {
|
||||
global workDir tree imgDir fontNormal
|
||||
global workDir imgDir fontNormal
|
||||
set tree .frmBody.frmCat.noteBook.fprojects.frmTree.tree
|
||||
lappend rList [list [file join $workDir $proj]]
|
||||
set projFile [open [file join $workDir $proj] r]
|
||||
set prjName [file rootname $proj]
|
||||
|
@ -1006,3 +1007,4 @@ proc InsertTitle {newFile type} {
|
|||
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user