Replacing in memory process from GtSubProcess instead of TaskIt futures.
This commit is contained in:
parent
af81f92399
commit
7b86b2cfeb
@ -139,17 +139,7 @@ BreaPage >> metadata: aDictionary [
|
|||||||
|
|
||||||
{ #category : #'as yet unclassified' }
|
{ #category : #'as yet unclassified' }
|
||||||
BreaPage >> populateBodyAs: key [
|
BreaPage >> populateBodyAs: key [
|
||||||
| allActions result semaphore |
|
self templateData at: key put: self bodyContentsAsHTML.
|
||||||
|
|
||||||
allActions := TKTFuture all: {
|
|
||||||
[ self bodyContentsAsHTML ] future.
|
|
||||||
}.
|
|
||||||
semaphore := Semaphore new.
|
|
||||||
allActions onSuccessDo: [ :values |
|
|
||||||
result := values last.
|
|
||||||
semaphore signal ].
|
|
||||||
semaphore wait.
|
|
||||||
self templateData at: key put: result contents.
|
|
||||||
^ self.
|
^ self.
|
||||||
]
|
]
|
||||||
|
|
||||||
@ -167,7 +157,7 @@ BreaPage >> populateMetadata [
|
|||||||
ifNil: [ metadataTemp := self contentsFile metadata].
|
ifNil: [ metadataTemp := self contentsFile metadata].
|
||||||
metadataTemp keysAndValuesDo: [ :key :value |
|
metadataTemp keysAndValuesDo: [ :key :value |
|
||||||
self templateData at: key put: value ].
|
self templateData at: key put: value ].
|
||||||
^ templateData
|
^ self templateData
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #operation }
|
{ #category : #operation }
|
||||||
|
Loading…
Reference in New Issue
Block a user