Default blue color for all custom annotations, before testing customized colors.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-01-01 21:00:16 -05:00
parent 349c314318
commit 9fc938407a

View File

@ -50,7 +50,7 @@ LeTextualSnippet >> contentAsStringAnnotated [
type := (key splitOn: ':') first copyWithoutAll: '{{'. type := (key splitOn: ':') first copyWithoutAll: '{{'.
value := key copyFrom: type size + 4 to: key size - 2. value := key copyFrom: type size + 4 to: key size - 2.
substitutions substitutions
at: key put: '<span st-class="',type,'">', value,'</span>'. at: key put: '<span st-class="',type,'" style="color:blue">', value,'</span>'.
]. ].
exported := self contentAsString. exported := self contentAsString.
substitutions keysAndValuesDo: [:k :v | substitutions keysAndValuesDo: [:k :v |