Popup windows for messages. Next: implementing tagged nodes.
This commit is contained in:
parent
f5ba3d7bc6
commit
f1191bb493
@ -493,6 +493,47 @@ GrafoscopioBrowser >> installPandoc [
|
||||
|
||||
]
|
||||
|
||||
{ #category : #'graphical interface' }
|
||||
GrafoscopioBrowser >> messageAbout [
|
||||
"Shows the author, license, sponsors and main contributors to the project and point to further documentation on the web"
|
||||
|
||||
UIManager default alert:
|
||||
'Grafosocpio',
|
||||
(String with: Character cr),
|
||||
'(c) Copyright 2014 by Offray Vladimir Luna Cárdenas',
|
||||
(String with: Character cr),
|
||||
'Covered under MIT license.',
|
||||
(String with: Character cr),
|
||||
(String with: Character cr),
|
||||
'SPONSORS:',
|
||||
(String with: Character cr),
|
||||
'mutabiT | www.mutabit.com ',
|
||||
(String with: Character cr),
|
||||
'Fundación Universitaria Los Libertadores | www.ulibertadores.edu.co ',
|
||||
(String with: Character cr),
|
||||
(String with: Character cr),
|
||||
'For further details and versions go to:',
|
||||
(String with: Character cr),
|
||||
(String with: Character cr),
|
||||
'http://mutabit.com/grafoscopio'
|
||||
|
||||
title: 'About Grafoscopio'.
|
||||
]
|
||||
|
||||
{ #category : #'graphical interface' }
|
||||
GrafoscopioBrowser >> messageNotImplementedYet [
|
||||
"Shows that a feature is not implemeted and point to further documentation on the web"
|
||||
|
||||
UIManager default abort:
|
||||
'Esta funcionalidad aún no está implementada!',
|
||||
(String with: Character cr),
|
||||
'Para información sobre futuras versiones, por favor visite:',
|
||||
(String with: Character cr),
|
||||
(String with: Character cr),
|
||||
'http://mutabit.com/grafoscopio'
|
||||
title: 'No implementado aún'.
|
||||
]
|
||||
|
||||
{ #category : #'graphical interface' }
|
||||
GrafoscopioBrowser >> open [
|
||||
"Opens a new browser with a default tree and assigns a default draft file for storing it.
|
||||
@ -947,15 +988,15 @@ GrafoscopioBrowser >> treeOn: constructor [
|
||||
act: [ ]; entitled: 'Etiquetar > como: Texto';"
|
||||
act: [self enableRepository] entitled: 'Activar' categorized: 'Proyecto';
|
||||
act: [self addFileToRepository] entitled: 'Agregar archivo' categorized: 'Proyecto';
|
||||
act: [:x | x printString inspect] entitled: 'Eliminar archivo' categorized: 'Proyecto';
|
||||
act: [self messageNotImplementedYet] entitled: 'Eliminar archivo' categorized: 'Proyecto';
|
||||
act: [self repositoryCommit] entitled: 'Enviar al histórico' categorized: 'Proyecto';
|
||||
act: [self repositoryCredentials] entitled: 'Acreditarse' categorized: 'Proyecto';
|
||||
act: [self updateSystem] entitled: 'Actualizar' categorized: 'Grafoscopio';
|
||||
act: [self updateSystem] entitled: 'Actualizar prerrequisitos' categorized: 'Grafoscopio';
|
||||
act: [:x | x printString inspect] entitled: 'Herramientas externas > Actualizar' categorized: 'Grafoscopio';
|
||||
act: [self updateGrafoscopio] entitled: 'Actualizar' categorized: 'Grafoscopio';
|
||||
act: [self updatePrerrequisites] entitled: 'Actualizar prerrequisitos' categorized: 'Grafoscopio';
|
||||
act: [self messageNotImplementedYet] entitled: 'Herramientas externas > Actualizar' categorized: 'Grafoscopio';
|
||||
act: [self configurePandoc] entitled: 'Herramientas externas > Definir ruta a pandoc' categorized: 'Grafoscopio';
|
||||
act: [:x | x printString inspect] entitled: 'Herramientas externas > Definir ruta a fossil' categorized: 'Grafoscopio';
|
||||
act: [:x | x printString inspect] entitled: 'Acerca de...' categorized: 'Grafoscopio'.
|
||||
act: [self messageNotImplementedYet] entitled: 'Herramientas externas > Definir ruta a fossil' categorized: 'Grafoscopio';
|
||||
act: [self messageAbout] entitled: 'Acerca de...' categorized: 'Grafoscopio'.
|
||||
|
||||
]
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user