File selector UI only adds new files if they're not in the list of recently opened files.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2015-06-23 19:05:16 +00:00
parent f51a7b639f
commit f38924015d

View File

@ -215,6 +215,7 @@ GrafoscopioBrowser class >> startDockingBar [
launchMenu
add: 'Documento interactivo nuevo' target: GrafoscopioBrowser selector: #open;
add: 'Documento interactivo desde archivo' target: (GrafoscopioBrowser new) selector: #openFromFileSelector;
add: 'Documento interactivo desde archivo' target: (GrafoscopioBrowser new) selector: #openFromUrl;
add: 'Documentos interactivos recientes' target: GrafoscopioBrowser selector: #openFromRecentlyUsed;
add: 'Documentos interactivos de ejemplo' target: GrafoscopioBrowser selector: #messageNotImplementedYet;
add: 'Ejemplos de visualizaciones en Roassal' target: (RTExampleBrowser new) selector: #open;
@ -949,7 +950,7 @@ GrafoscopioBrowser >> openFromFileSelector [
self buildBrowserNamed: workingFile basenameWithIndicator.
recentTrees isNil
ifTrue:[recentTrees := OrderedCollection new].
recentTrees add: workingFile.
recentTrees detect: workingFile ifFound: [recentTrees add: workingFile].
mainTree := GrafoscopioNode new
header: 'Arbol principal';
level: 0.