Grafoscopio
/
Grafoscopio
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Starting open from file in main interface.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2015-03-25 19:52:18 +00:00 committed by SantiagoBragagnolo
parent 8e62f1df6f
commit bbfde23c18
1 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/Grafoscopio/GrafoscopioBrowser.class.st
View File

@ -98,6 +98,22 @@ GrafoscopioBrowser class >> messageAbout [
title: 'About Grafoscopio'.
]
{ #category : #'as yet unclassified' }
GrafoscopioBrowser class >> messageNoRecentDocuments [
"Shows that a feature is not implemeted and point to further documentation on the web"
UIManager default abort:
'No hay documentos recientes.',
(String with: Character cr),
'Abra un documento usando el menú:',
(String with: Character cr),
(String with: Character cr),
'"Lanzar > Documento interactivo desde archivo"',
(String with: Character cr),
(String with: Character cr)
title: 'No hay documentos recientes'.
]
{ #category : #'as yet unclassified' }
GrafoscopioBrowser class >> messageNotImplementedYet [
"Shows that a feature is not implemeted and point to further documentation on the web"
@ -129,7 +145,7 @@ GrafoscopioBrowser class >> openFromRecentlyUsed [
selection := UIManager default chooseFrom: recentTrees title: 'Elija una documento'.
"aNode tagAs: (tagsAvailable at: selection)"
]
ifTrue: [self messageNoTagsAvailable].
ifTrue: [self messageNoRecentDocuments].
"browser update".
@ -188,6 +204,7 @@ GrafoscopioBrowser class >> startDockingBar [
launchMenu := MenuMorph new.
launchMenu
add: 'Documento interactivo nuevo' target: GrafoscopioBrowser selector: #open;
add: 'Documento interactivo desde archivo' target: (GrafoscopioBrowser new) selector: #openFromFileSelector;
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;