Fix a code goofup. Add a link to Moose::Unsweetened.

[gitmo/Moose.git] / lib / Moose / Intro.pod

diff --git a/lib/Moose/Intro.pod b/lib/Moose/Intro.pod
index 288490e..3a4fbb5 100644 (file)
--- a/lib/Moose/Intro.pod
+++ b/lib/Moose/Intro.pod
@@ -72,13 +72,13 @@ This is a I<complete and usable> class definition!
 
   has 'password' => (
       is  => 'rw',
-      isa => Str ',
-          );
+      isa => 'Str',
+  );
 
   has 'last_login' => (
       is      => 'rw',
       isa     => 'DateTime',
-      handles => { 'last_login_date' => 'date' },
+      handles => { 'date_of_last_login' => 'date' },
   );
 
   sub login {
@@ -287,8 +287,8 @@ delegations. A delegation is a method which delegates the real work to
 some attribute of the class.
 
 You saw this in the User example, where we defined a delegation for
-the C<last_login_date()> method. Under the hood, this simple calls
-C<date()> on the User object's C<last_login_datetime> attribute.
+the C<date_of_last_login()> method. Under the hood, this simple calls
+C<date()> on the User object's C<last_login> attribute.
 
 =head2 Constructor
 
@@ -525,6 +525,9 @@ After that, check out the Role recipes. If you're really curious, go
 on and read the Meta and Extending recipes, but those are mostly there
 for people who want to be Moose wizards and change how Moose works.
 
+If you want to see how Moose would translate directly old school Perl
+5 OO code, check out the L<Moose::Unsweetened>.
+
 =head1 AUTHOR
 
 Dave Rolsky E<lt>autarch@urth.orgE<gt> and Stevan Little