Implementing management of unversioned files.
This commit is contained in:
parent
b3c77bc208
commit
8b8bc188a6
@ -81,12 +81,14 @@ GrafoscopioDocumentation >> documents: anObject [
|
|||||||
|
|
||||||
{ #category : #updating }
|
{ #category : #updating }
|
||||||
GrafoscopioDocumentation >> download: fileNameWithRelativePath [
|
GrafoscopioDocumentation >> download: fileNameWithRelativePath [
|
||||||
| fileName parentFolder |
|
| fileName parentFolder sanitized lastVersion |
|
||||||
fileName := (fileNameWithRelativePath splitOn: $/) last.
|
fileName := (fileNameWithRelativePath splitOn: $/) last.
|
||||||
|
sanitized := self repository sanitize: fileNameWithRelativePath.
|
||||||
|
lastVersion := self repository lastVersionPath: fileNameWithRelativePath.
|
||||||
parentFolder := GrafoscopioUtils
|
parentFolder := GrafoscopioUtils
|
||||||
ensureCreateDirectory: fileNameWithRelativePath into: self localPlace.
|
ensureCreateDirectory: sanitized into: self localPlace.
|
||||||
GrafoscopioUtils
|
GrafoscopioUtils
|
||||||
downloadingFrom: self repository remote asString, '/doc/tip/', fileNameWithRelativePath
|
downloadingFrom: self repository remote asString, lastVersion
|
||||||
withMessage: 'Downloading ', fileName
|
withMessage: 'Downloading ', fileName
|
||||||
into: parentFolder
|
into: parentFolder
|
||||||
]
|
]
|
||||||
|
Loading…
Reference in New Issue
Block a user