From: Jason McIntosh <jmac@appleseed-sc.com>
Date: Tue, 22 Jan 2013 03:17:47 +0000 (-0500)
Subject: Clarifying that the "around" method modifier can come from Moose, and adding a traili... 
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bb9965718958c89331e3a5fcdf55bd2f92f7aca9;p=dbsrgits%2FDBIx-Class-Historic.git

Clarifying that the "around" method modifier can come from Moose, and adding a trailing semicolon to the "around" example. (This way, it better agrees with the information in Manual::FAQ).
---

diff --git a/lib/DBIx/Class/Manual/Cookbook.pod b/lib/DBIx/Class/Manual/Cookbook.pod
index 56b3250..f5990eb 100644
--- a/lib/DBIx/Class/Manual/Cookbook.pod
+++ b/lib/DBIx/Class/Manual/Cookbook.pod
@@ -1941,8 +1941,8 @@ just looking for this.
 For example, say that you have three columns, C<id>, C<number>, and
 C<squared>.  You would like to make changes to C<number> and have
 C<squared> be automagically set to the value of C<number> squared.
-You can accomplish this by wrapping the C<number> accessor with
-L<Class::Method::Modifiers>:
+You can accomplish this by wrapping the C<number> accessor with the C<around> method modifier, available through either 
+L<Class::Method::Modifiers> or L<Moose|Moose::Manual::MethodModifiers>):
 
   around number => sub {
     my ($orig, $self) = (shift, shift);
@@ -1953,7 +1953,7 @@ L<Class::Method::Modifiers>:
     }
 
     $self->$orig(@_);
-  }
+  };
 
 Note that the hard work is done by the call to C<< $self->$orig >>, which
 redispatches your call to store_column in the superclass(es).