Added 10x loop around auto tests
[catagits/Catalyst-Runtime.git] / lib / Catalyst.pm
index 8cba4f4..86886b0 100644 (file)
@@ -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,7 +524,7 @@ sub stash {
     return $c->{stash};
 }
 
-=head1 $c->welcome_message
+=item $c->welcome_message
 
 Returns the Catalyst welcome HTML page.
 
@@ -525,6 +533,7 @@ Returns the Catalyst welcome HTML page.
 sub welcome_message {
     my $c    = shift;
     my $name = $c->config->{name};
+    my $logo = $c->uri_for('/static/images/catalyst_logo.png');
     return <<"EOF";
 <html>
     <head>
@@ -546,10 +555,13 @@ sub welcome_message {
                 border: 1px solid #aaa;
                 -moz-border-radius: 10px;
             }
-            p, h1, h2, a {
+            p, h1, h2 {
                 margin-left: 20px;
                 margin-right: 20px;
-                font-family: garamond, verdana, tahoma, sans-serif;
+                font-family: verdana, tahoma, sans-serif;
+            }
+            a {
+                font-family: verdana, tahoma, sans-serif;
             }
             :link, :visited {
                     text-decoration: none;
@@ -557,12 +569,15 @@ sub welcome_message {
                     border-bottom: 1px dotted #bbb;
             }
             :link:hover, :visited:hover {
-                    background-color: #fff;
                     color: #555;
             }
             div#topbar {
                 margin: 0px;
             }
+            pre {
+                margin: 10px;
+                padding: 8px;
+            }
             div#answers {
                 padding: 8px;
                 margin: 10px;
@@ -571,7 +586,8 @@ sub welcome_message {
                 -moz-border-radius: 10px;
             }
             h1 {
-                font-size: 1.2em;
+                font-size: 0.9em;
+                font-weight: normal;
                 text-align: center;
             }
             h2 {
@@ -580,64 +596,81 @@ sub welcome_message {
             p {
                 font-size: 0.9em;
             }
-            p.signature {
-                text-align: right;
-                font-style: italic;
+            p img {
+                float: right;
+                margin-left: 10px;
+            }
+            b#appname {
+                font-size: 1.6em;
             }
         </style>
     </head>
     <body>
         <div id="content">
             <div id="topbar">
-                <h1>$name on Catalyst $VERSION</h1>
+                <h1><b id="appname">$name</b> on <a href="http://catalyst.perl.org">Catalyst</a>
+                    $VERSION</h1>
              </div>
              <div id="answers">
-                 <p>Welcome to the wonderfull world of Catalyst.
-                    This MVC framework will make webdevelopment
+                 <p>
+                 <img src="$logo"/>
+                 </p>
+                 <p>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.</p>
                  <h2>What to do now?</h2>
-                 <p>That all depends really, on what <b>you</b> want to do.
+                 <p>That really depends  on what <b>you</b> want to do.
                     We do, however, provide you with a few starting points.</p>
                  <p>If you want to jump right into web development with Catalyst
-                    you might want to check out the following links.</p>
-                 <ul>
-                     <li>
-                         <a href="http://catalyst.perl.org">
-                             Catalyst::Manual::Intro
-                         </a>
-                     </li>
-                 </ul>
+                    you might want to check out the documentation.</p>
+                 <pre><code>perldoc <a href="http://cpansearch.perl.org/dist/Catalyst/lib/Catalyst/Manual.pod">Catalyst::Manual</a>
+perldoc <a href="http://cpansearch.perl.org/dist/Catalyst/lib/Catalyst/Manual/Intro.pod">Catalyst::Manual::Intro</a></code></pre>
                  <p>If you would like some background information on the
-                    MVC-pattern, theese links might be able to help you out.</p>
+                    MVC-pattern, these links might be of help to you.</p>
                  <ul>
                      <li>
-                         <a href="http://catalyst.perl.org">
+                         <a href="http://dev.catalyst.perl.org/wiki/Models">
                              Introduction to Models
                          </a>
                      </li>
                      <li>
-                         <a href="http://catalyst.perl.org">
+                         <a href="http://dev.catalyst.perl.org/wiki/Views">
                              Introduction to Views
                          </a>
                      </li>
                      <li>
-                         <a href="http://catalyst.perl.org">
+                         <a href="http://dev.catalyst.perl.org/wiki/Controllers">
                              Introduction to Controllers
                          </a>
                      </li>
                  </ul>
                  <h2>What to do next?</h2>
-                 <p>Next you need to create an actuall application. Use the
-                    helper scripts for what they are worth, they can save you
-                    alot of work getting everything set up. Also, be sure to
-                    check out the vast array of plugins for Catalyst.
-                    They can handle everything from Authentication to Static
-                    files, and a whole lot in  between.</p>
+                 <p>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.
+                    </p>
+
+                 <h2>Need help?</h2>
+                 <p>Catalyst has a very active community. Here are the main places to
+                    get in touch with us.</p>
+                 <ul>
+                     <li>
+                         <a href="http://dev.catalyst.perl.org">Wiki</a>
+                     </li>
+                     <li>
+                         <a href="http://lists.rawmode.org/mailman/listinfo/catalyst">Mailing-List</a>
+                     </li>
+                     <li>
+                         <a href="irc://irc.perl.org/catalyst">IRC channel #catalyst on irc.perl.org</a>
+                     </li>
+                 </ul>
                  <h2>In conclusion</h2>
-                 <p>The Catalyst team hope you will enjoy Catalyst as much as we                    enjoyed making it, and that rest asure that any and all
-                    feedback is welcomed</p>
-                 <p class="signature">-- there is no cabal, 2005</p>
+                 <p>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.</p>
              </div>
          </div>
     </body>
@@ -1591,6 +1624,10 @@ Andy Grundman
 
 Andy Wardley
 
+Andreas Marienborg
+
+Andrew Bramble
+
 Andrew Ford
 
 Andrew Ruthven
@@ -1644,7 +1681,7 @@ Sebastian Riedel, C<sri@oook.de>
 =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