15 lines
509 B
Smalltalk
15 lines
509 B
Smalltalk
accessing
|
|
installExternalWordCloudCommons
|
|
|
|
| commonFiles folder |
|
|
commonFiles := #(
|
|
'https://mutabit.com/repos.fossil/mutabit/uv/wiki/commons/nube-mascara.jpg'
|
|
'https://mutabit.com/repos.fossil/mutabit/raw/cf2aa88169752092a0bd39f8e20128abc85ad5c47d9679496663570c4d30fff0?at=stopwords-es.txt').
|
|
folder := TweetsCollection dataStore / 'commons'.
|
|
folder exists ifFalse: [ folder ensureCreateDirectory].
|
|
commonFiles do: [ :fileUrl |
|
|
ZnClient new
|
|
url: fileUrl;
|
|
downloadTo: folder].
|
|
^ folder
|
|
|