diff options
| author | Lars Dɪᴇᴄᴋᴏᴡ <daxim@cpan.org> | 2008-12-01 21:51:19 +0100 |
|---|---|---|
| committer | Lars Dɪᴇᴄᴋᴏᴡ <daxim@cpan.org> | 2008-12-01 21:51:19 +0100 |
| commit | 37bf16dd1b77c138dda3603f44422c1291f18e6b (patch) | |
| tree | b441b33353f8065b127c858153b500841ee6b8e0 /lib/PAUSE/OpenID/Controller/Root.pm | |
| parent | add heading, link to PAUSE (diff) | |
| parent | Merge branch 'master' of git@git.useperl.at:PAUSE-OpenID (diff) | |
| download | Simple-OpenID-37bf16dd1b77c138dda3603f44422c1291f18e6b.tar.gz Simple-OpenID-37bf16dd1b77c138dda3603f44422c1291f18e6b.tar.bz2 Simple-OpenID-37bf16dd1b77c138dda3603f44422c1291f18e6b.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 { |