Modifyng installer for commons.
This commit is contained in:
parent
c32a351932
commit
defb1a8819
@ -3,7 +3,7 @@ externalWordCloud
|
|||||||
|
|
||||||
| text outputFile |
|
| text outputFile |
|
||||||
self areCommonFilesInstalled
|
self areCommonFilesInstalled
|
||||||
ifFalse: [ self installExternalWordCloudCommons ].
|
ifFalse: [ self installCommons ].
|
||||||
self writeWordsFile.
|
self writeWordsFile.
|
||||||
outputFile := (self folder / 'wordcloud.png') fullName.
|
outputFile := (self folder / 'wordcloud.png') fullName.
|
||||||
text := (self folder / 'words', 'txt') fullName.
|
text := (self folder / 'words', 'txt') fullName.
|
||||||
|
@ -1,10 +1,11 @@
|
|||||||
accessing
|
accessing
|
||||||
installExternalWordCloudCommons
|
installCommons
|
||||||
|
|
||||||
| commonFiles folder |
|
| commonFiles folder |
|
||||||
commonFiles := #(
|
commonFiles := #(
|
||||||
'https://mutabit.com/repos.fossil/mutabit/uv/wiki/commons/nube-mascara.jpg'
|
'https://mutabit.com/repos.fossil/mutabit/uv/wiki/commons/nube-mascara.jpg'
|
||||||
'https://mutabit.com/repos.fossil/mutabit/raw?name=wiki/commons/stopwords-es.txt&ci=tip').
|
'https://mutabit.com/repos.fossil/mutabit/raw?name=wiki/commons/stopwords-es.txt&ci=tip'
|
||||||
|
'https://mutabit.com/repos.fossil/mutabit/uv/wiki/commons/logo-mutabit-negro.png').
|
||||||
folder := TweetsCollection dataStore / 'commons'.
|
folder := TweetsCollection dataStore / 'commons'.
|
||||||
folder exists
|
folder exists
|
||||||
ifTrue: [ folder ensureDeleteAllChildren ]
|
ifTrue: [ folder ensureDeleteAllChildren ]
|
Loading…
Reference in New Issue
Block a user