Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Updating notebook GUI to English. At some point it needs to become a multilanguage one and support Spanish again.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-05-18 15:08:33 +00:00
parent 2260bdaebe
commit 184b44e960
2 changed files with 36 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

50
repository/Grafoscopio/GrafoscopioBrowser.class.st
View File

@ -100,9 +100,10 @@ GrafoscopioBrowser class >> downloadingFrom: downloadUrl withMessage: aString in
[: bar | [: bar |
bar title: aString. bar title: aString.
[ZnClient new [ZnClient new
get: downloadUrl; enforceHttpSuccess: true;
signalProgress: true; url: downloadUrl;
downloadTo: location. downloadTo: location;
signalProgress: true
] ]
on: HTTPProgress on: HTTPProgress
do: [ :progress | do: [ :progress |
@ -284,39 +285,38 @@ GrafoscopioBrowser class >> startDockingBar [
launchMenu := MenuMorph new. launchMenu := MenuMorph new.
launchMenu launchMenu
add: 'Cuaderno nuevo' target: GrafoscopioBrowser selector: #open; add: 'New notebook' target: self selector: #open;
add: 'Cuaderno desde archivo...' target: (GrafoscopioBrowser new) selector: #openFromFileSelector; add: 'Notebook from file...' target: (self new) selector: #openFromFileSelector;
add: 'Cuaderno desde Internet...' target: (GrafoscopioBrowser new) selector: #openFromUrlUI; add: 'Notebook from Internet...' target: (self new) selector: #openFromUrlUI;
add: 'Cuadernos recientes...' target: GrafoscopioBrowser selector: #openFromRecentlyUsed; add: 'Recent notebooks...' target: self selector: #openFromRecentlyUsed;
add: 'Cuadernos de ejemplo' target: GrafoscopioBrowser selector: #messageNotImplementedYet; add: 'Example notebooks...' target: self selector: #messageNotImplementedYet;
add: 'Ejemplos de visualizaciones en Roassal' target: (RTExampleBrowser new) selector: #open; add: 'Roassal visualizations gallery' target: (RTExampleBrowser new) selector: #open;
add: 'Playground' target: (Smalltalk tools) selector: #openWorkspace; add: 'Playground' target: (Smalltalk tools) selector: #openWorkspace;
add: 'Transcript' target: (Smalltalk tools) selector: #openTranscript. add: 'Transcript' target: (Smalltalk tools) selector: #openTranscript.
updateMenu := MenuMorph new. updateMenu := MenuMorph new.
updateMenu updateMenu
add: 'Grafoscopio' target: GrafoscopioBrowser selector: #updateGrafoscopioUI; add: 'Grafoscopio' target: self selector: #updateGrafoscopioUI;
add: 'Documentación' target: GrafoscopioBrowser selector: #updateDocumentationUI; add: 'Documentation' target: self selector: #updateDocumentationUI;
add: 'Paquete DataViz' target: GrafoscopioBrowser selector: #updateDatavizUI; add: 'DataViz package' target: self selector: #updateDatavizUI;
add: 'Base de datos' target: ExternalApp selector: #installSQLite32BitsUI; add: 'Database engine' target: ExternalApp selector: #installSQLite32BitsUI;
add: 'Ruta a pandoc' target: ExternalApp selector: #configurePandoc; add: 'Pandoc path' target: ExternalApp selector: #configurePandoc;
add: 'Ruta a fossil' target: ExternalApp selector: #configureFossil; add: 'Fossil path' target: ExternalApp selector: #configureFossil;
add: 'Todo el sistema' target: GrafoscopioBrowser selector: #updateSystem. add: 'All the system' target: self selector: #updateSystem.
helpMenu := MenuMorph new. helpMenu := MenuMorph new.
helpMenu helpMenu
add: 'Tutorial en grafoscopio' target: (GrafoscopioBrowser new) selector: #openTutorialInGrafoscopio; add: 'Tutorial in Grafoscopio' target: (self new) selector: #openTutorialInGrafoscopio;
add: 'Manual en PDF' target: GrafoscopioBrowser selector: #openHelpInPdf; add: 'PDF Manual' target: self selector: #openHelpInPdf;
add: 'Manual en HTML' target: GrafoscopioBrowser selector: #openHelpInHtml; add: 'HTML Manual' target: self selector: #openHelpInHtml;
add: 'Manual en grafoscopio' target: (GrafoscopioBrowser new) selector: #openHelpInGrafoscopio; add: 'Manual in grafoscopio' target: (self new) selector: #openHelpInGrafoscopio;
add: 'Ir a la documentación en línea' target: GrafoscopioBrowser selector: #messageNotImplementedYet; add: 'About Grafoscopio' target: self selector: #messageAbout.
add: 'Acerca de Grafoscopio' target: GrafoscopioBrowser selector: #messageAbout.
dockingBar := DockingBarMorph new. dockingBar := DockingBarMorph new.
dockingBar dockingBar
add: 'Lanzar' subMenu: launchMenu; add: 'Launch' subMenu: launchMenu;
add: 'Actualizar' subMenu: updateMenu; add: 'Update' subMenu: updateMenu;
add: 'Ayuda' subMenu: helpMenu. add: 'Help' subMenu: helpMenu.
dockingBar dockingBar
adhereToTop; adhereToTop;
openInWorld. openInWorld.

12
repository/Grafoscopio/GrafoscopioNotebook.class.st
View File

@ -15,11 +15,20 @@ Class {
'tree', 'tree',
'header', 'header',
'body', 'body',
'windowMainMenu' 'windowMainMenu',
'workingFile'
], ],
#category : #'Grafoscopio-UI' #category : #'Grafoscopio-UI'
} }
{ #category : #utility }
GrafoscopioNotebook class >> SHA1For: aFile is: aSHA1String [
"I verify that a file has the same signature that the one in a given string,
returning true in that case or false otherwise"
^ (SHA1 new hashMessage: aFile asFileReference binaryReadStream contents) hex = aSHA1String
]
{ #category : #specs } { #category : #specs }
GrafoscopioNotebook class >> defaultSpec [ GrafoscopioNotebook class >> defaultSpec [
"comment stating purpose of message" "comment stating purpose of message"
@ -255,6 +264,7 @@ GrafoscopioNotebook >> openFromFile: aFileName [
| root nb | | root nb |
workingFile := aFileName.
root := ((STON fromString: aFileName contents) at: 1) parent. root := ((STON fromString: aFileName contents) at: 1) parent.
nb := self class new. nb := self class new.
nb title: aFileName basenameWithIndicator, ' | Grafoscopio notebook'. nb title: aFileName basenameWithIndicator, ' | Grafoscopio notebook'.