First post

This commit is contained in:
Nathan McCarty 2025-02-05 05:59:34 -05:00
parent 53c0c6a9d6
commit 4c3e514a14
8 changed files with 152 additions and 18 deletions

View file

@ -79,7 +79,16 @@ sub markdown-first-paragraph(IO::Path:D $file --> Str:D) is export {
$para ~= $component<c>;
}
when "Space" {
$para ~= " ";
$para ~= ' ';
}
when "Code" {
$para ~= $component<c>[*-1];
}
when "SoftBreak" {
$para ~= "\n";
}
when "Link" {
$para ~= $component<c>[1][0]<c>;
}
default {
die "Invalid component type: $_";