11 lines
420 B
Smalltalk
11 lines
420 B
Smalltalk
|
accessing
|
||
|
exportWithTemplate: mustacheFile On: fileReference
|
||
|
|
||
|
| directory data mustacheDoc |
|
||
|
directory := fileReference parent.
|
||
|
data := self asDictionary.
|
||
|
self exportProfileImageOn:directory / userName, '-profileImage.jpg'.
|
||
|
mustacheDoc := mustacheFile asMustacheTemplate value: data.
|
||
|
MarkupFile
|
||
|
exportAsFileOn: (directory / (data at:'profile-card-username') asDashedLowercase , 'tex')
|
||
|
containing: mustacheDoc
|