diff --git a/repository/Grafoscopio/GrafoscopioBrowser.class.st b/repository/Grafoscopio/GrafoscopioBrowser.class.st index f6a5e02..d5727bd 100644 --- a/repository/Grafoscopio/GrafoscopioBrowser.class.st +++ b/repository/Grafoscopio/GrafoscopioBrowser.class.st @@ -143,7 +143,7 @@ GrafoscopioBrowser class >> openFromRecentlyUsed [ recentTrees isNil ifFalse: [ selection := UIManager default chooseFrom: recentTrees title: 'Elija una documento'. - "aNode tagAs: (tagsAvailable at: selection)" + GrafoscopioBrowser new openFromFile: (recentTrees at: selection) ] ifTrue: [self messageNoRecentDocuments]. "browser update". @@ -818,7 +818,6 @@ GrafoscopioBrowser >> openFromFile: aFileName [ | currentChildren | GrafoscopioBrowser configureSettings. - aFileName isNil ifTrue: [ ^nil ]. workingFile := aFileName name asFileReference. currentChildren := (STON fromString: aFileName contents). self buildBrowserNamed: aFileName basenameWithIndicator. @@ -826,9 +825,6 @@ GrafoscopioBrowser >> openFromFile: aFileName [ header: 'Arbol principal'; level: 0. mainTree children: currentChildren. - recentTrees isNil - ifTrue:[recentTrees := OrderedCollection new]. - recentTrees add: workingFile. browser openOn: mainTree children. ] @@ -864,6 +860,9 @@ GrafoscopioBrowser >> openFromFileSelector [ workingFile := fileStream name asFileReference. currentChildren := (STON fromStream: fileStream). self buildBrowserNamed: workingFile basenameWithIndicator. + recentTrees isNil + ifTrue:[recentTrees := OrderedCollection new]. + recentTrees add: workingFile. mainTree := GrafoscopioNode new header: 'Arbol principal'; level: 0.