<span class="delete">with 'Printable';</span>
-<span class="highlight">die '...' unless __PACKAGE__->can('as_string');
-
-has has_been_printed => ( is => 'rw' );
+<span class="highlight">has has_been_printed => ( is => 'rw' );
sub print {
my $self = shift;
# or ...
-Person->meta->does('Printable')</code></pre>
+Person->meta->does_role('Printable')</code></pre>
</div>
</div>
<div class="slide">
- <h1>Hot Role-on-Role Action</h1>
+ <h1>Roles With Roles</h1>
<pre><code>package Comparable;
use Moose::Role;
</div>
<div class="slide">
- <h1>Hot Role-on-Role Action</h1>
+ <h1>Roles With Roles</h1>
<pre><code>package TestsEquality;
use Moose::Role;