Starting to fix estimated creation time for nodes when importing. Fossil and a remote location are required for that.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2023-04-17 08:55:37 -05:00
parent 1ee1d2bab9
commit 51ad735e0e

View File

@ -12,11 +12,20 @@ Class {
'created',
'nodesInPreorder',
'selected',
'edited'
'edited',
'headers',
'key',
'output'
],
#category : #MiniDocs
}
{ #category : #accessing }
GrafoscopioNode class >> fromFile: aFileReference [
^ (STON fromString: aFileReference contents) first parent
]
{ #category : #accessing }
GrafoscopioNode >> ancestors [
"I return a collection of all the nodes wich are ancestors of the receiver node"
@ -104,7 +113,9 @@ GrafoscopioNode >> created: anObject [
GrafoscopioNode >> earliestCreationDate [
| earliest |
earliest := self nodesWithCreationDates first created.
self nodesWithCreationDates ifNotEmpty: [
earliest := self nodesWithCreationDates first created]
ifEmpty: [ earliest := self ].
self nodesWithCreationDates do: [:node |
node created <= earliest ifTrue: [ earliest := node created ] ].
^ earliest