Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

SQLite: moving files. Next cleaning leftovers and maybe starting a new object to model external apps handling (SQLite, fossil and pandoc)

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-03-21 11:09:04 +00:00
parent 64ab651a82
commit 7d32f4eb1d
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
repository/Grafoscopio/GrafoscopioBrowser.class.st
View File

@ -137,7 +137,7 @@ GrafoscopioBrowser class >> installSQLite32Bits [
"I dowload the SQLite binary for the hosting platform, uncompress it and made it available as with the name
NBSQLite is wating for"
| packageUrl sha1 localPath packageName |
| packageUrl sha1 localPath packageZipName |
localPath := FileSystem disk workingDirectory parent / 'bin'.
Smalltalk platform name = 'unix'
@ -156,10 +156,12 @@ GrafoscopioBrowser class >> installSQLite32Bits [
downloadingFrom: packageUrl
withMessage: 'Descargando SQLite...'
into: localPath asFileReference.
packageName := (packageUrl splitOn: '/') last.
packageZipName := (packageUrl splitOn: '/') last.
ZipArchive new
readFrom: (localPath / packageName);
extractAllTo: localPath asFileReference.
readFrom: (localPath / packageZipName);
extractAllTo: localPath asFileReference.
(localPath / (packageZipName copyReplaceAll: '.zip' with: '')) children do: [:file | file moveTo: (localPath / file basenameWithIndicator) ]
]
{ #category : #'graphical interface' }