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. "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" This is changed when the file is saved with the 'Save as' menu option"
"self configureSettings." "Opens a new browser with a default tree"
mainTree := GrafoscopioNode new. GrafoscopioBrowser configureSettings.
mainTree becomeDefaultTree. self openDefault.
workingFile := draftsLocation / 'draft.ston'.
self openFromFile: workingFile.
] ]