Add one more slide on Why Moose

[gitmo/moose-presentations.git] / moose-class / slides / index.html

diff --git a/moose-class/slides/index.html b/moose-class/slides/index.html
index bc2aeb1..d9157e7 100644 (file)
--- a/moose-class/slides/index.html
+++ b/moose-class/slides/index.html
@@ -275,7 +275,7 @@ has weight => (
 );
 
 # kaboom
-Person-&gt;new( weight =&gt; 'fat' );</code></pre>
+Person-&gt;new( weight =&gt; 'heavy' );</code></pre>
 </div>
 
 <div class="slide">
@@ -842,6 +842,16 @@ has last_name =&gt; (
 );</code></pre>
 </div>
 
+<div class="slide">
+    <h1>More Why Moose?</h1>
+
+    <ul>
+      <li>Less code == fewer bugs</li>
+      <li>Moose is well-tested, test your own code, not Moose</li>
+      <li>Focus on <strong>what</strong>, not <strong>how</strong></li>
+    </ul>
+</div>
+
 <div class="slide fake-slide0">
   <h1>Part 1: Moose Classes</h1>
 </div>
@@ -3349,7 +3359,7 @@ has history =&gt; (
       </ul>
     </li>
   </ul>
-<div>
+</div>
 
 <div class="slide">
   <h1>Native Delegation - Array(Ref)</h1>
@@ -3424,11 +3434,19 @@ has account =&gt; (
             <span class="highlight">[ 'deposit', 100 ]</span>
         give_100    =&gt;
             <span class="highlight">[ 'withdraw', 100 ]</span>
-    },</span>
+    },
 );</code></pre>
 </div>
 
 <div class="slide">
+  <h1>Curried Delegation</h1>
+
+  <pre><code>$person-&gt;receive_100;
+# really is
+$person-&gt;account-&gt;deposit(100);</code></pre>
+</div>
+
+<div class="slide">
   <h1>Traits and Metaclasses</h1>
 
   <ul>
@@ -3537,8 +3555,8 @@ Iterate til this passes all its tests</pre>
   <h1>Part 8: A Brief Tour of MooseX</h1>
 </div>
 
-<div clas="slide">
-  <h1>Notable Moose Extensions on CPAN</h1>
+<div class="slide">
+  <h1>Notable MX Modules on CPAN</h1>
 
   <ul>
     <li><strong>Not comprehensive</strong></li>
@@ -3700,18 +3718,18 @@ my $clone  = <span class="highlight">$person-&gt;clone;</span></code></pre>
   <h1>MooseX::Role::Parameterized</h1>
 
   <pre><code>package HasCollection;
-use MooseX::Role::Parameterized;
-
-parameter type =&gt; ( isa     =&gt; 'Str',
-                    default =&gt; 'Item' );
-role {
+<span class="current incremental">use MooseX::Role::Parameterized;</span>
+<span class="incremental">parameter type =&gt; ( isa     =&gt; 'Str',
+                    default =&gt; 'Item' );</span>
+<span class="incremental">role {
     my $p = shift;
 
-    my $type = 'ArrayRef[' . $p-&gt;type() . ']';
+    my $type =
+        'ArrayRef[' . $p-&gt;type() . ']';
     has collection =&gt;
         ( is  =&gt; 'ro',
           isa =&gt; $type );
-};</code></pre>
+};</span></code></pre>
 </div>
 
 <div class="slide">