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.

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