Eligiendo "Documento" en lugar de árbol.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2015-03-14 16:10:07 +00:00
parent 23648d3bf9
commit 9aefc0d6af

View File

@ -62,12 +62,12 @@ GrafoscopioBrowser class >> configureSettings [
Smalltalk platform name = 'unix'
ifTrue: [
fossil := (FileSystem disk workingDirectory parent / 'Platform/Linux/Programs/Fossil/fossil') fullName.
pandoc := (FileSystem disk workingDirectory parent / 'Platform/Linux/Programs/Pandoc/pandoc') fullName].
fossil := (FileSystem disk workingDirectory parent / 'Platform' / 'Linux' / 'Programs' / 'Fossil'/ 'fossil') fullName.
pandoc := (FileSystem disk workingDirectory parent / 'Platform' / 'Linux' / 'Programs' / 'Pandoc' / 'pandoc') fullName].
Smalltalk platform name = 'Win32'
ifTrue: [
fossil := (FileSystem disk workingDirectory parent / 'Platform/Windows/Programs/Fossil/fossil.exe') fullName.
pandoc := (FileSystem disk workingDirectory parent / 'Platform/Windows/Programs/Pandoc/pandoc.exe') fullName].
fossil := (FileSystem disk workingDirectory parent / 'Platform' / 'Windows' / 'Programs' / 'Fossil' / 'fossil.exe') fullName.
pandoc := (FileSystem disk workingDirectory parent / 'Platform' / 'Windows' / 'Programs' / 'Pandoc' / 'pandoc.exe') fullName].
]
{ #category : #'as yet unclassified' }
@ -160,9 +160,9 @@ GrafoscopioBrowser class >> startDockingBar [
launchMenu := MenuMorph new.
launchMenu
add: 'Arbol/Documento interactivo nuevo' target: GrafoscopioBrowser action: #open;
add: 'Arboles/Documentos interactivos recientes' target: GrafoscopioBrowser action: #messageNotImplementedYet;
add: 'Arboles/Documentos interactivos de ejemplo' target: GrafoscopioBrowser action: #messageNotImplementedYet;
add: 'Documento interactivo nuevo' target: GrafoscopioBrowser action: #open;
add: 'Documentos interactivos recientes' target: GrafoscopioBrowser action: #messageNotImplementedYet;
add: 'Documentos interactivos de ejemplo' target: GrafoscopioBrowser action: #messageNotImplementedYet;
add: 'Ejemplos de visualizaciones en Roassal' target: (RTExampleBrowser new) action: #open;
add: 'Playground' target: (Smalltalk tools) action: #openWorkspace.