diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-02-17 21:41:31 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-02-17 21:41:31 -0600 |
commit | a0c5a7ce958bf1f619b95f7b5235b1fddd43e961 (patch) | |
tree | 9fb5cdb459dfba46ba8036b70954f91d76fd9d71 /lib/Narwhal/Component/Wiki | |
parent | 224898fb1fd3046fcb82461610d5dd3ff0d0b01f (diff) | |
download | narwhal-a0c5a7ce958bf1f619b95f7b5235b1fddd43e961.tar.gz narwhal-a0c5a7ce958bf1f619b95f7b5235b1fddd43e961.zip |
actually, only edit needs the special http method thing
Diffstat (limited to 'lib/Narwhal/Component/Wiki')
-rw-r--r-- | lib/Narwhal/Component/Wiki/Page.pm | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/lib/Narwhal/Component/Wiki/Page.pm b/lib/Narwhal/Component/Wiki/Page.pm deleted file mode 100644 index 8dd6adf..0000000 --- a/lib/Narwhal/Component/Wiki/Page.pm +++ /dev/null @@ -1,27 +0,0 @@ -package Narwhal::Component::Wiki::Page; -use Moose; - -with 'Narwhal::Component::Role::Wiki'; - -sub get { - my $self = shift; - my ($req, $page) = @_; - - my $page_obj = $self->lookup("page:$page"); - return $req->new_response(404) - unless $page_obj; - - $self->render( - $req, - 'page.tt', - { - text => $page_obj->text, - page => $page, - }, - ); -} - -__PACKAGE__->meta->make_immutable; -no Moose; - -1; |