Fixing empty metadata fields.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-01-28 20:34:46 -05:00
parent a5e2db3869
commit 326a28fce3

View File

@ -10,8 +10,8 @@ LePage >> asMarkdeep [
markdeep := Markdeep new markdeep := Markdeep new
title: self title; title: self title;
body: bodyStream contents. body: bodyStream contents.
markdeep metadata at: 'authors' put: (self metadata at: 'authors'). markdeep metadata at: 'authors' put: (self metadata at: 'authors' ifAbsentPut: [ '']).
markdeep metadata at: 'version' put: (self metadata at: 'version'). markdeep metadata at: 'version' put: (self metadata at: 'version' ifAbsentPut: [ '']).
self metadata keysAndValuesDo: [:k :v | self metadata keysAndValuesDo: [:k :v |
markdeep header markdeep header
add: '<meta name="', k, '" content="', v,'">'; add: '<meta name="', k, '" content="', v,'">';