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-12 15:50:22 +00:00
parent b70b7b6b31
commit 2260bdaebe
1 changed files with 41 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -113,95 +113,95 @@ GrafoscopioNotebook >> newWindowMainMenu [
addGroup: [ :group | addGroup: [ :group |
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Cuaderno'; name: 'Notebook';
icon: Smalltalk ui icons smallObjectsIcon; icon: Smalltalk ui icons smallObjectsIcon;
subMenu: self notebookSubMenu ]. subMenu: self notebookSubMenu ].
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Proyecto'; name: 'Project';
icon: Smalltalk ui icons catalogIcon; icon: Smalltalk ui icons catalogIcon;
subMenu: self projectSubMenu ] ]; subMenu: self projectSubMenu ] ];
addGroup: [ :group | addGroup: [ :group |
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Guardar documento'; description: 'Save notebook';
icon: Smalltalk ui icons smallSaveIcon; icon: Smalltalk ui icons smallSaveIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Deshacer'; description: 'Undo';
icon: Smalltalk ui icons smallUndoIcon; icon: Smalltalk ui icons smallUndoIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Rehacer'; description: 'Redo';
icon: Smalltalk ui icons smallRedoIcon; icon: Smalltalk ui icons smallRedoIcon;
action: [ self inform: 'Por implementar...' ] ]]; action: [ self inform: 'To be implemented...' ] ]];
addGroup: [ :group | addGroup: [ :group |
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Agregar nodo'; description: 'Add nodo';
icon: MendaIcons new plusIcon; icon: MendaIcons new plusIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Eliminar nodo'; description: 'Delete node';
icon: MendaIcons new minusIcon; icon: MendaIcons new minusIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Subir nodo'; description: 'Move up node';
icon: MendaIcons new arrowUpIcon; icon: MendaIcons new arrowUpIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Bajar nodo'; description: 'Move down node';
icon: MendaIcons new arrowDownIcon; icon: MendaIcons new arrowDownIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Mover nodo a la izquierda'; description: 'Move node left';
icon: MendaIcons new arrowLeftIcon; icon: MendaIcons new arrowLeftIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Mover nodo a la derecha'; description: 'Move node right';
icon: MendaIcons new arrowRightIcon; icon: MendaIcons new arrowRightIcon;
action: [ self inform: 'Por implementar...' ] ]]; action: [ self inform: 'To be implemented...' ] ]];
addGroup: [ :group | addGroup: [ :group |
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Intercambiar: código <--> texto'; description: 'Togle: code <--> text';
icon: MendaIcons new smalltalkCodeIcon; icon: MendaIcons new smalltalkCodeIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Etiquetar como...'; description: 'Tag as...';
icon: MendaIcons new tagAddIcon; icon: MendaIcons new tagAddIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Desetiquetar ....'; description: 'Untag ....';
icon: MendaIcons new tagMinusIcon; icon: MendaIcons new tagMinusIcon;
action: [ self inform: 'Por implementar...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Editar etiquetas...'; description: 'Edit tags...';
icon: FontAwesomeIcons new tagsIcon; icon: FontAwesomeIcons new tagsIcon;
action: [ self inform: 'Por implementar...' ] ]. ]. action: [ self inform: 'To be implemented...' ] ]].
] ]
{ #category : #api } { #category : #api }
@ -218,36 +218,35 @@ GrafoscopioNotebook >> notebookSubMenu [
addGroup: [ :group | addGroup: [ :group |
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Guardar'; name: 'Save';
icon: Smalltalk ui icons smallSaveIcon; icon: Smalltalk ui icons smallSaveIcon;
shortcut: $s command; shortcut: $s command;
action: [ self inform: 'Guardar | Por implementar ...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Guardar como...'; name: 'Save as...';
icon: Smalltalk ui icons smallSaveAsIcon; icon: Smalltalk ui icons smallSaveAsIcon;
action: [ self inform: 'Guardar | Por implementar ...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Exportar como html'; name: 'Export as html';
icon: Smalltalk ui icons smallWindowIcon; icon: Smalltalk ui icons smallWindowIcon;
action: [ self inform: 'Por implementar ...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Exportar como pdf'; name: 'Export as pdf';
icon: Smalltalk ui icons smallPrintIcon; icon: Smalltalk ui icons smallPrintIcon;
action: [ self inform: 'Por implementar ...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Ver html'; name: 'See html';
icon: Smalltalk ui icons smallInspectItIcon; icon: Smalltalk ui icons smallInspectItIcon;
action: [ self inform: 'Por implementar ...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: 'Ver pdf'; name: 'See pdf';
icon: Smalltalk ui icons smallInspectItIcon; icon: Smalltalk ui icons smallInspectItIcon;
action: [ self inform: 'Por implementar ...' ] ] ] action: [ self inform: 'To be implemented...' ] ] ]
] ]
{ #category : #persistence } { #category : #persistence }
@ -258,7 +257,7 @@ GrafoscopioNotebook >> openFromFile: 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. nb title: aFileName basenameWithIndicator, ' | Grafoscopio notebook'.
nb notebookContent: root. nb notebookContent: root.
^ nb openWithSpec. ^ nb openWithSpec.
] ]
@ -301,11 +300,6 @@ GrafoscopioNotebook >> projectSubMenu [
] ]
{ #category : #api }
GrafoscopioNotebook >> title [
^'GrafoscopioNotebook'
]
{ #category : #accessing } { #category : #accessing }
GrafoscopioNotebook >> tree [ GrafoscopioNotebook >> tree [
^ tree ^ tree