summaryrefslogtreecommitdiffstats
path: root/lib/Narwhal
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Narwhal')
-rw-r--r--lib/Narwhal/Component/Role/Wiki.pm4
-rw-r--r--lib/Narwhal/Component/Wiki/Edit.pm14
-rw-r--r--lib/Narwhal/Component/Wiki/Page.pm12
3 files changed, 12 insertions, 18 deletions
diff --git a/lib/Narwhal/Component/Role/Wiki.pm b/lib/Narwhal/Component/Role/Wiki.pm
index c57cf7e..a48cf9b 100644
--- a/lib/Narwhal/Component/Role/Wiki.pm
+++ b/lib/Narwhal/Component/Role/Wiki.pm
@@ -8,9 +8,9 @@ has kioku => (
);
has tt => (
- isa => 'Template',
+ isa => 'OX::View::TT',
required => 1,
- handles => ['process'],
+ handles => ['render'],
);
has scope => (
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;