From 2260bdaebe3b0c70508426ecacc72578c73e14b9 Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Thu, 12 May 2016 15:50:22 +0000 Subject: [PATCH] Updating notebook GUI to English. At some point it needs to become a multilanguage one and support Spanish again. --- .../Grafoscopio/GrafoscopioNotebook.class.st | 88 +++++++++---------- 1 file changed, 41 insertions(+), 47 deletions(-) diff --git a/repository/Grafoscopio/GrafoscopioNotebook.class.st b/repository/Grafoscopio/GrafoscopioNotebook.class.st index e8b2eed..e4f96fe 100644 --- a/repository/Grafoscopio/GrafoscopioNotebook.class.st +++ b/repository/Grafoscopio/GrafoscopioNotebook.class.st @@ -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