Enriching object metadata during exportation.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-06-11 15:43:23 -05:00
parent eeaf28127b
commit 47aabb1d4f

View File

@ -4,6 +4,11 @@ Extension { #name : #GtGQLSnippet }
GtGQLSnippet >> asMarkdeep [ GtGQLSnippet >> asMarkdeep [
| output | | output |
output := WriteStream on: ''. output := WriteStream on: ''.
self metadata
at: 'operation' put: self operation;
at: 'input' put: self input;
at: 'context' put: self context;
yourself.
output output
nextPutAll: self metadataDiv; nextPutAll: self metadataDiv;
nextPutAll: self markdeepCustomOpener; nextPutAll: self markdeepCustomOpener;