diff options
| author | Jozef Kutej <jozef@kutej.net> | 2008-12-01 21:48:32 +0100 |
|---|---|---|
| committer | Jozef Kutej <jozef@kutej.net> | 2008-12-01 21:48:32 +0100 |
| commit | c8d904fa5da55a63c97c5232205cc162c92d94d6 (patch) | |
| tree | a1c09f44691bd18335ff9c985a4355f901d88a01 /lib/PAUSE/OpenID/Controller/Root.pm | |
| parent | #!/usr/bin/perl (diff) | |
| parent | Merge branch 'master' of git@git.useperl.at:PAUSE-OpenID (diff) | |
| download | Simple-OpenID-c8d904fa5da55a63c97c5232205cc162c92d94d6.tar.gz Simple-OpenID-c8d904fa5da55a63c97c5232205cc162c92d94d6.tar.bz2 Simple-OpenID-c8d904fa5da55a63c97c5232205cc162c92d94d6.zip | |
Merge branch 'master' of git@git.useperl.at:PAUSE-OpenID
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 { |