Making 'open' to use 'openDefault' (should be renamed?)

This commit is contained in:
Offray Vladimir Luna Cárdenas 2015-03-30 12:42:36 +00:00
parent 07828dce74
commit 683ce67f5a

View File

@ -816,11 +816,9 @@ GrafoscopioBrowser >> open [
"Opens a new browser with a default tree and assigns a default draft file for storing it.
This is changed when the file is saved with the 'Save as' menu option"
"self configureSettings."
mainTree := GrafoscopioNode new.
mainTree becomeDefaultTree.
workingFile := draftsLocation / 'draft.ston'.
self openFromFile: workingFile.
"Opens a new browser with a default tree"
GrafoscopioBrowser configureSettings.
self openDefault.
]