X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=86886b0bbe75f1c8396507d9cc9eb1cd20b688f8;hp=dc1761031a3c8832859515c3388031d279cbcb64;hb=b960cfb8d2267479c5b1ea040687ffdcb181bcea;hpb=6844bc1caaad5e344a888d87d86b4e2e61afb154 diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index dc17610..86886b0 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -500,9 +500,17 @@ Contains the return value of the last executed action. Returns a hashref containing all your data. - $c->stash->{foo} ||= 'yada'; print $c->stash->{foo}; +Keys may be set in the stash by assigning to the hash reference, or by passing +either a single hash reference or a list of key/value pairs as arguments. + +For example: + + $c->stash->{foo} ||= 'yada'; + $c->stash( { moose => 'majestic', qux => 0 } ); + $c->stash( bar => 1, gorch => 2 ); + =cut sub stash { @@ -516,6 +524,160 @@ sub stash { return $c->{stash}; } +=item $c->welcome_message + +Returns the Catalyst welcome HTML page. + +=cut + +sub welcome_message { + my $c = shift; + my $name = $c->config->{name}; + my $logo = $c->uri_for('/static/images/catalyst_logo.png'); + return <<"EOF"; + + + $name on Catalyst $VERSION + + + +
+
+

$name on Catalyst + $VERSION

+
+
+

+ +

+

Welcome to the wonderful world of Catalyst. + This MVC framework will make web development + something you had never expected it to be: + Fun, rewarding and quick.

+

What to do now?

+

That really depends on what you want to do. + We do, however, provide you with a few starting points.

+

If you want to jump right into web development with Catalyst + you might want to check out the documentation.

+ 
perldoc Catalyst::Manual
+perldoc Catalyst::Manual::Intro
+

If you would like some background information on the + MVC-pattern, these links might be of help to you.

+ +

What to do next?

+

Next it's time to write an actual application. Use the + helper scripts to generate controllers, models and views, they + can save you a lot of work. Also, be sure to check out the vast + and growing collection of plugins for Catalyst on CPAN, you are + likely to find what you need there. +

+ +

Need help?

+

Catalyst has a very active community. Here are the main places to + get in touch with us.

+ +

In conclusion

+

The Catalyst team hope you will enjoy using Catalyst as much + as we enjoyed making it. Please contact us if you have ideas + for improvement or other feedback.

+
+
+ + +EOF +} + =back =head1 INTERNAL METHODS @@ -1462,6 +1624,10 @@ Andy Grundman Andy Wardley +Andreas Marienborg + +Andrew Bramble + Andrew Ford Andrew Ruthven @@ -1515,7 +1681,7 @@ Sebastian Riedel, C =head1 LICENSE This library is free software . You can redistribute it and/or modify it under -the same terms as perl itself. +the same terms as Perl itself. =cut