post now command

This commit is contained in:
Nathan McCarty 2025-02-09 18:09:06 -05:00
parent 972b73f665
commit 448908c18e
4 changed files with 17 additions and 1 deletions

View file

@ -16,6 +16,7 @@ IO::Path:D $.source
#| The time to display for the creation of the post
has
DateTime:D $.posted-at
is rw
is required
is json(
:to-json(*.Str),

View file

@ -11,7 +11,6 @@ sub show-html($html) is export {
$out ~~ s:g/'</i>' \v+ '<span>'/<\/i><span>/;
$out ~~ s:g/\v+ '</a>'/<\/a>/;
$out ~~ s:g/\s+ ',' \s+ '<span'/, <span/;
# TODO: Deal with the nbsps in the header
$out
}