Repositories: Preliminary support for local repositories with graphical interface for commits.
This commit is contained in:
parent
f4be383711
commit
a73dbf3110
@ -721,9 +721,9 @@ GrafoscopioBrowser >> commitToRepository [
|
|||||||
ifTrue: [
|
ifTrue: [
|
||||||
OSProcess command:
|
OSProcess command:
|
||||||
'cd ', (mainTree metadata at: 'localRepository') asFileReference parent fullName, '; ',
|
'cd ', (mainTree metadata at: 'localRepository') asFileReference parent fullName, '; ',
|
||||||
fossil, ' commit -m "', commitMessage, '"; ',
|
fossil, ' commit --no-warnings -m "', commitMessage, '"; ',
|
||||||
'echo "commit sended to the repository"'.
|
'echo "commit sended to the repository"'.
|
||||||
self inform: 'Archivo adicionado al repositorio']
|
self inform: 'Histórico del proyecto sincronizado']
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #'persistance / repositories' }
|
{ #category : #'persistance / repositories' }
|
||||||
@ -734,7 +734,13 @@ GrafoscopioBrowser >> commitToRepositoryDebug [
|
|||||||
textEntry: 'Ingrese el mensaje asociado a este envío al historial'
|
textEntry: 'Ingrese el mensaje asociado a este envío al historial'
|
||||||
title: 'Mensaje para el historial'.
|
title: 'Mensaje para el historial'.
|
||||||
commitMessage isNil ifTrue: [ ^nil ].
|
commitMessage isNil ifTrue: [ ^nil ].
|
||||||
self inform: (mainTree metadata at: 'localRepository') asString
|
(mainTree metadata at: 'localRepository') notNil
|
||||||
|
ifTrue: [
|
||||||
|
OSProcess command:
|
||||||
|
'cd ', (mainTree metadata at: 'localRepository') asFileReference parent fullName, '; ',
|
||||||
|
fossil, ' commit -m "', commitMessage, '"; ',
|
||||||
|
'echo "commit sended to the repository"'.
|
||||||
|
self inform: fossil]
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #'system-support' }
|
{ #category : #'system-support' }
|
||||||
@ -1418,7 +1424,7 @@ GrafoscopioBrowser >> treeOn: constructor [
|
|||||||
act: [self enableLocalRepository] entitled: 'Activar repositorio local...' categorized: 'Proyecto';
|
act: [self enableLocalRepository] entitled: 'Activar repositorio local...' categorized: 'Proyecto';
|
||||||
act: [self addFileToRepository] entitled: 'Agregar archivo...' categorized: 'Proyecto';
|
act: [self addFileToRepository] entitled: 'Agregar archivo...' categorized: 'Proyecto';
|
||||||
act: [self messageNotImplementedYet] entitled: 'Eliminar archivo...' categorized: 'Proyecto';
|
act: [self messageNotImplementedYet] entitled: 'Eliminar archivo...' categorized: 'Proyecto';
|
||||||
act: [self commitToRepositoryDebug] entitled: 'Enviar al histórico' categorized: 'Proyecto';
|
act: [self commitToRepository] entitled: 'Enviar al histórico' categorized: 'Proyecto';
|
||||||
act: [self messageNotImplementedYet "repositoryCredentials"] entitled: 'Acreditarse' categorized: 'Proyecto'.
|
act: [self messageNotImplementedYet "repositoryCredentials"] entitled: 'Acreditarse' categorized: 'Proyecto'.
|
||||||
]
|
]
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user