Making 'open' to use 'openDefault' (should be renamed?)
This commit is contained in:
parent
07828dce74
commit
683ce67f5a
@ -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.
|
|
||||||
|
|
||||||
]
|
]
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user