Adding configuration variables.
This commit is contained in:
parent
af367cd50c
commit
afbb61ffd9
@ -0,0 +1,4 @@
|
||||
accessing
|
||||
config: aDictionary
|
||||
|
||||
config := aDictionary
|
4
Datanalitica.package/NitterUser.class/instance/config.st
Normal file
4
Datanalitica.package/NitterUser.class/instance/config.st
Normal file
@ -0,0 +1,4 @@
|
||||
accessing
|
||||
config
|
||||
|
||||
^ config
|
@ -0,0 +1,4 @@
|
||||
accessing
|
||||
downloadProfileImage
|
||||
|
||||
self exportProfileImageOn: self folder / self userName, '.jpg'
|
@ -1,11 +1,9 @@
|
||||
accessing
|
||||
exportWithTemplate: mustacheFile On: fileReference
|
||||
exportWithTemplate: mustacheFile On: folder
|
||||
|
||||
| directory data mustacheDoc |
|
||||
directory := fileReference parent.
|
||||
data := self asDictionary.
|
||||
self exportProfileImageOn:directory / userName, '-profileImage.jpg'.
|
||||
mustacheDoc := mustacheFile asMustacheTemplate value: data.
|
||||
| mustacheDoc |
|
||||
self exportProfileImageOn:folder / userName, '-profileImage.jpg'.
|
||||
mustacheDoc := mustacheFile asMustacheTemplate value: self asDictionary.
|
||||
MarkupFile
|
||||
exportAsFileOn: (directory / (data at:'profile-card-username') asDashedLowercase , 'tex')
|
||||
exportAsFileOn: (folder / self userName , 'tex')
|
||||
containing: mustacheDoc
|
4
Datanalitica.package/NitterUser.class/instance/folder.st
Normal file
4
Datanalitica.package/NitterUser.class/instance/folder.st
Normal file
@ -0,0 +1,4 @@
|
||||
accessing
|
||||
folder
|
||||
|
||||
^ self config at: 'folder'.
|
@ -5,7 +5,9 @@
|
||||
"classinstvars" : [ ],
|
||||
"pools" : [ ],
|
||||
"classvars" : [ ],
|
||||
"instvars" : [ ],
|
||||
"instvars" : [
|
||||
"config"
|
||||
],
|
||||
"name" : "NitterUser",
|
||||
"type" : "normal"
|
||||
}
|
Loading…
Reference in New Issue
Block a user