diff --git a/src/Microdown/MicMetaDataBlock.class.st b/src/Microdown/MicMetaDataBlock.class.st index ab5f339b..8acbccca 100644 --- a/src/Microdown/MicMetaDataBlock.class.st +++ b/src/Microdown/MicMetaDataBlock.class.st @@ -46,7 +46,7 @@ MicMetaDataBlock >> bogusParsing [ { #category : 'markups' } MicMetaDataBlock >> closeMe [ super closeMe. - body := [ STONJSON fromString: '{', body, '}' ] on: STONReaderError do: [ :ex | + body := [ STONJSON fromString: '{', body, '}' ] on: Error do: [ :ex | | dict | bogusParsing := true. dict := Dictionary new at: self keyForUnparsableContents put: body; yourself ]