diff --git a/repository/Brea/BreaPage.class.st b/repository/Brea/BreaPage.class.st index ea3845d..94a47ab 100644 --- a/repository/Brea/BreaPage.class.st +++ b/repository/Brea/BreaPage.class.st @@ -77,7 +77,7 @@ BreaPage >> exportAsHTML [ self shortName ifNil: [ ^ self ]. self template ifNil: [ ^ self ]. actionsArray := { [ self populateMetadata ] future. }. - self splitters ifNotEmpty: [ actionsArray := actionsArray copyWith: [ [ self split ] future ] ]. + self splitters ifNotEmpty: [ actionsArray := actionsArray copyWith: [ self split ] future ]. self bodyTag ifNotNil: [ actionsArray := actionsArray copyWith: [ self populateBodyAs: self bodyTag ] future ]. allActions := TKTFuture all: actionsArray.