Tweaks
This commit is contained in:
parent
73de17fc2c
commit
49502df416
2 changed files with 3 additions and 2 deletions
|
@ -39,6 +39,7 @@ sub post-to-item(BlogMeta:D $meta, Int:D $id, Post:D $post --> XML::Element) {
|
|||
$xml.append: $author;
|
||||
$xml.append:
|
||||
XML::Element.new(:name<link>, :attribs({:href($link), :rel<alternate>}));
|
||||
# TODO: Actually embed the content
|
||||
$xml.append:
|
||||
XML::Element.new(:name<content>, :attribs({:src($link), :type<html>}));
|
||||
$xml.append:
|
||||
|
|
|
@ -23,8 +23,8 @@ has Str:D $.base-url is required;
|
|||
#| Return the base url, but substitute it out if the test environment variable
|
||||
#| is set
|
||||
method get-base-url(--> Str:D) {
|
||||
if %*ENV<BLOG_TEST> {
|
||||
"http://localhost:8080"
|
||||
if %*ENV<LOCAL_RSS> {
|
||||
"http://localhost:8000"
|
||||
} else {
|
||||
$!base-url
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue