Improve highlighting on native traits sample code

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

diff --git a/moose-class/slides/index.html b/moose-class/slides/index.html
index 1f2c059..46ac36a 100644 (file)
--- a/moose-class/slides/index.html
+++ b/moose-class/slides/index.html
@@ -3201,8 +3201,12 @@ has account => (
     },</code></pre>
 
   <ul>
-    <li><code>$person-&gt;receive_money</code> = <code>$person-&gt;account-&gt;deposit</code></li>
-    <li><code>$person-&gt;give_money</code> = <code>$person-&gt;account-&gt;withdraw</code></li>
+    <li><code>$person-&gt;receive_money</code>
+      <br/>
+      &nbsp;&nbsp;&nbsp;&nbsp;= <code>$person-&gt;account-&gt;deposit</code></li>
+    <li><code>$person-&gt;give_money</code>
+      <br/>
+      &nbsp;&nbsp;&nbsp;&nbsp;= <code>$person-&gt;account-&gt;withdraw</code></li>
   </ul>
 </div>
 
@@ -3290,7 +3294,7 @@ has history =&gt; (
   <pre><code>package Person;
 use Moose;
 has _favorite_numbers =&gt; (
-    traits   =&gt; [ 'Array' ],
+    <span class="highlight">traits   =&gt; [ 'Array' ],</span>
     isa      =&gt; 'ArrayRef[Int]',
     default  =&gt; sub { [] },
     init_arg =&gt; undef,
@@ -3369,82 +3373,6 @@ $person-&gt;account-&gt;deposit(100);</code></pre>
 </div>
 
 <div class="slide">
-  <h1>Traits and Metaclasses</h1>
-
-  <ul>
-    <li>The ultimate in customization</li>
-    <li>Per attribute metaclasses</li>
-    <li>Per attribute roles applied to the attribute metaclass</li>
-    <li>Change the meta-level behavior</li>
-  </ul>
-</div>
-
-<div class="slide">
-  <h1>Traits and Metaclasses</h1>
-
-  <ul>
-    <li>The default metaclass is <code>Moose::Meta::Attribute</code></li>
-    <li>Controls accessor generation, defaults, delegation, etc.</li>
-    <li>Adding a role to this metaclass (or replacing it) allows for infinite customization</li>
-  </ul>
-</div>
-
-<div class="slide">
-  <h1>Traits and Metaclasses</h1>
-
-  <ul>
-    <li>Can add/alter/remove an attribute parameter (from <code>has</code>)</li>
-    <li>Can change behavior of created attribute</li>
-  </ul>
-</div>
-
-<div class="slide">
-  <h1>Simple Trait Example</h1>
-
-  <pre><code>package Person;
-use Moose;
-use MooseX::LabeledAttributes;
-
-has ssn =&gt; (
-    <span class="highlight">traits =&gt; [ 'Labeled' ],</span>
-    is     =&gt; 'ro',
-    isa    =&gt; 'Str',
-    <span class="highlight">label  =&gt; 'Social Security Number',</span>
-);
-print <span class="highlight">Person-&gt;meta
-            -&gt;get_attribute('ssn')-&gt;label;</span></code></pre>
-</div>
-
-<div class="slide">
-  <h1>Simple Metaclass Example</h1>
-
-  <pre><code>package Person;
-use Moose;
-use MooseX::LabeledAttributes;
-
-has ssn =&gt; (
-    <span class="highlight">metaclass =&gt;
-        'MooseX::Meta::Attribute::Labeled',</span>
-    is        =&gt; 'ro',
-    isa       =&gt; 'Str',
-    <span class="highlight">label     =&gt; 'Social Security Number',</span>
-);
-print <span class="highlight">Person-&gt;meta
-            -&gt;get_attribute('ssn')-&gt;label;</span></code></pre>
-</div>
-
-<div class="slide">
-  <h1>Traits vs Metaclass</h1>
-
-  <ul>
-    <li>Can apply any mix of traits to an attribute</li>
-    <li>But just one metaclass</li>
-    <li>Traits (aka roles) can cooperate</li>
-    <li>Metaclasses require you to pick just one</li>
-  </ul>
-</div>
-
-<div class="slide">
   <h1>Advanced Attributes Summary</h1>
 
   <ul>
@@ -3452,7 +3380,6 @@ print <span class="highlight">Person-&gt;meta
     <li>Use trigger to do an action post-attribute write</li>
     <li>Use delegations to hide "internal" objects</li>
     <li>Use native delegations to treat Perl types as objects</li>
-    <li>Traits and metaclasses let you extend Moose's core attribute features</li>
   </ul>
 </div>
 
@@ -3685,12 +3612,13 @@ with HasCollection =&gt; { type =&gt; 'Int' };</code></pre>
   </p>
 
   <ul>
-    <li><a href="http://search.cpan.org/dist/Catalyst-Runtime">Catalyst</a></li>
-    <li><a href="http://search.cpan.org/dist/CHI">CHI</a></li>
-    <li><a href="http://search.cpan.org/dist/Devel-REPL">Devel::REPL</a></li>
-    <li><a href="http://search.cpan.org/dist/Email-Sender">Email::Sender</a></li>
-    <li><a href="http://search.cpan.org/dist/Fey">Fey</a></li>
-    <li><a href="http://search.cpan.org/dist/Net-Twitter">Net::Twitter</a></li>
+    <li><a href="http://metacpan.org/release/Catalyst-Runtime">Catalyst</a></li>
+    <li><a href="http://metacpan.org/release/CHI">CHI</a></li>
+    <li><a href="http://metacpan.org/release/Devel-REPL">Devel::REPL</a></li>
+    <li><a href="http://metacpan.org/release/Dist-Zilla">Dist::Zilla</a></li>
+    <li><a href="http://metacpan.org/release/Email-Sender">Email::Sender</a></li>
+    <li><a href="http://metacpan.org/release/Fey">Fey</a></li>
+    <li><a href="http://metacpan.org/release/Net-Twitter">Net::Twitter</a></li>
   </ul>
 </div>
 
@@ -3699,7 +3627,7 @@ with HasCollection =&gt; { type =&gt; 'Int' };</code></pre>
 
   <ul>
     <li><a href="http://moose.perl.org/">http://moose.perl.org/</a></li>
-    <li><a href="http://search.cpan.org/dist/Moose/lib/Moose/Manual.pod">Moose::Manual</a> and <a href="http://search.cpan.org/dist/Moose/lib/Moose/Cookbook.pod">Moose::Cookbook</a></li>
+    <li><a href="https://metacpan.org/module/Moose::Manual">Moose::Manual</a> and <a href="https://metacpan.org/module/Moose::Cookbook">Moose::Cookbook</a></li>
     <li><a href="irc://irc.perl.org/#moose">irc://irc.perl.org/#moose</a></li>
     <li>mailing list - <a href="mailto:moose@perl.org">moose@perl.org</a></li>
     <li>Slides and exercises are in Moose's git repo: