From: Dave Rolsky Date: Thu, 17 Jun 2010 19:25:53 +0000 (-0500) Subject: Lots of HTML entity fixes X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=203ca9ec15fd5a0f45b5598dc6a0eb74a5334d0f;p=gitmo%2Fmoose-presentations.git Lots of HTML entity fixes --- diff --git a/moose-class/slides/index.html b/moose-class/slides/index.html index 5b91f02..a88be31 100644 --- a/moose-class/slides/index.html +++ b/moose-class/slides/index.html @@ -300,8 +300,8 @@ has blog_uri => ( handles => { 'blog_host' => 'host' }, ); -$person->blog_host; -# really calls $person->blog_uri->host +$person->blog_host; +# really calls $person->blog_uri->host
@@ -955,7 +955,7 @@ sub BUILD {
  • Calls Person->BUILDARGS(@_) to turn @_ into a hashref
  • Blesses a reference
  • Populates attributes based on the hashref from #1
  • -
  • Calls $new_object->BUILDALL($constructor_args) +
  • Calls $new_object->BUILDALL($constructor_args)
    ... which calls all BUILD methods
  • Returns the object
  • @@ -1127,7 +1127,7 @@ print $person->first_name; # Dave use Moose; # true -Person->can('extends'); +Person->can('extends');
    @@ -1158,7 +1158,7 @@ use Moose; ... # false -Person->can('extends'); +Person->can('extends');
    @@ -1182,7 +1182,7 @@ Person->can('extends');
    package Person;
     use Moose;
     
    -__PACKAGE__->meta->make_immutable;
    +__PACKAGE__->meta->make_immutable;
    @@ -1348,7 +1348,7 @@ use Moose; with 'Printable'; -die '...' unless __PACKAGE__->can('as_string'); +die '...' unless __PACKAGE__->can('as_string'); has has_been_printed => ( is => 'rw' ); @@ -1473,9 +1473,9 @@ use Moose; sub break { my $self = shift; - $self->break_it_down; + $self->break_it_down; if ( rand(1) < 0.5 ) { - $self->break_bone; + $self->break_bone; } }
    @@ -1510,7 +1510,7 @@ with 'Comparable'; sub is_equal { my $self = shift; - return $self->compare(@_) == 0; + return $self->compare(@_) == 0; } @@ -1525,8 +1525,8 @@ with 'TestsEquality'; # Satisfies the Comparable role sub compare { ... } -Integer->does('TestsEquality'); # true -Integer->does('Comparable'); # also true! +Integer->does('TestsEquality'); # true +Integer->does('Comparable'); # also true!
    @@ -1633,7 +1633,7 @@ has [ 'left', 'right' ] => (
    use Moose::Util qw( apply_all_roles );
     
    -my $fragile_person = Person->new( ... );
    +my $fragile_person = Person->new( ... );
     apply_all_roles( $fragile_person,
                      'IsFragile' );
    @@ -1789,8 +1789,8 @@ has first_name => ( required => 1, ); -Person->new( first_name => undef ); # ok -Person->new(); # kaboom +Person->new( first_name => undef ); # ok +Person->new(); # kaboom
    @@ -2060,11 +2060,11 @@ has shoe_size => ( init_arg => 'foot_size', ); -Person->new( shoe_size => 13 ); +Person->new( shoe_size => 13 ); my $person = - Person->new( foot_size => 13 ); -print $person->shoe_size; + Person->new( foot_size => 13 ); +print $person->shoe_size;
    @@ -2078,7 +2078,7 @@ has shoes => ( init_arg => undef, ); -Person->new( shoes => Shoes->new ); +Person->new( shoes => Shoes->new );
    @@ -2399,7 +2399,7 @@ after clear_password => sub { $self->$orig( $self->_munge_insert(@_) ); - $new_user->_assign_uri; + $new_user->_assign_uri; return $new_user; };
    @@ -3734,7 +3734,7 @@ sub run { ... } use App::CLI; -App::CLI->new_with_options()->run(); +App::CLI->new_with_options()->run();
    $ myapp-cli \
        --file foo \