summaryrefslogtreecommitdiffstats
path: root/lib/Narwhal/Component/Wiki
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Narwhal/Component/Wiki')
-rw-r--r--lib/Narwhal/Component/Wiki/Edit.pm14
-rw-r--r--lib/Narwhal/Component/Wiki/Page.pm12
2 files changed, 10 insertions, 16 deletions
diff --git a/lib/Narwhal/Component/Wiki/Edit.pm b/lib/Narwhal/Component/Wiki/Edit.pm
index d05e7a0..df03598 100644
--- a/lib/Narwhal/Component/Wiki/Edit.pm
+++ b/lib/Narwhal/Component/Wiki/Edit.pm
@@ -8,17 +8,15 @@ sub get {
my ($req, $page) = @_;
my $page_obj = $self->lookup("page:$page");
- my $out;
- $self->process(
+
+ $self->render(
+ $req,
'edit.tt',
{
- uri_for => sub { $req->uri_for({@_}) },
- text => ($page_obj ? $page_obj->text : ''),
- page => $page
- },
- \$out,
+ text => ($page_obj ? $page_obj->text : ''),
+ page => $page,
+ }
);
- return $req->new_response(200, [], $out);
}
sub post {
diff --git a/lib/Narwhal/Component/Wiki/Page.pm b/lib/Narwhal/Component/Wiki/Page.pm
index 09cdb34..8dd6adf 100644
--- a/lib/Narwhal/Component/Wiki/Page.pm
+++ b/lib/Narwhal/Component/Wiki/Page.pm
@@ -11,18 +11,14 @@ sub get {
return $req->new_response(404)
unless $page_obj;
- my $out;
- $self->process(
+ $self->render(
+ $req,
'page.tt',
{
- uri_for => sub { $req->uri_for({@_}) },
- text => $page_obj->text,
- page => $page
+ text => $page_obj->text,
+ page => $page,
},
- \$out
);
-
- return $req->new_response(200, [], $out);
}
__PACKAGE__->meta->make_immutable;