diff options
Diffstat (limited to 'lib/PAUSE/OpenID/Controller/Root.pm')
-rw-r--r-- | lib/PAUSE/OpenID/Controller/Root.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/PAUSE/OpenID/Controller/Root.pm b/lib/PAUSE/OpenID/Controller/Root.pm index 915801c..c37b2c2 100644 --- a/lib/PAUSE/OpenID/Controller/Root.pm +++ b/lib/PAUSE/OpenID/Controller/Root.pm @@ -29,8 +29,12 @@ PAUSE::OpenID::Controller::Root - Root Controller for PAUSE::OpenID sub index :Path :Args(0) { my ( $self, $c ) = @_; +$c->stash->{xml} =<<XML; +<document/> +XML + # Hello World - $c->response->body( $c->welcome_message ); + $c->forward('PAUSE::OpenID::View::XSLT'); } sub default :Path { |