28 lines
521 B
Raku
28 lines
521 B
Raku
|
use v6.e.PREVIEW;
|
||
|
|
|
||
|
|
use HTML::Functional;
|
||
|
|
use DB::BlogMeta;
|
||
|
|
|
||
|
|
unit class Config;
|
||
|
|
|
||
|
|
method generate-post(Str:D $title, Str:D $content, BlogMeta:D $meta) {
|
||
|
|
my $head =
|
||
|
|
head [
|
||
|
|
meta :charset<utf-8>;
|
||
|
|
meta :name<viewport>, :content<width=device-width, initial-scale=1>;
|
||
|
|
# meta :name<description>, :content<raku does htmx>;
|
||
|
|
title "";
|
||
|
|
];
|
||
|
|
my $body;
|
||
|
|
# my $footer;
|
||
|
|
|
||
|
|
die "Not done yet";
|
||
|
|
|
||
|
|
my $html = html :lang<en>, [
|
||
|
|
$head,
|
||
|
|
$body
|
||
|
|
];
|
||
|
|
|
||
|
|
"<!doctype html>$html"
|
||
|
|
}
|