From: David Baird <cpan.zerofive@googlemail.com>
Date: Mon, 3 Oct 2005 11:10:42 +0000 (+0000)
Subject: Added comment to Maypole::handler()
X-Git-Tag: 2.11~137
X-Git-Url: https://git.decadent.org.uk/gitweb/?a=commitdiff_plain;h=9c46db42380b9098624d080a919830e47669e2b9;hp=436e67e2ddca8e590809acea95dd4d47b4726da6;p=maypole.git

Added comment to Maypole::handler()

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@381 48953598-375a-da11-a14b-00016c27c3ee
---

diff --git a/lib/Maypole.pm b/lib/Maypole.pm
index 5668951..5bb07d5 100644
--- a/lib/Maypole.pm
+++ b/lib/Maypole.pm
@@ -58,6 +58,11 @@ sub init
 
 }
 
+# handler() has a method attribute so that mod_perl will invoke
+# BeerDB->handler() as a method rather than a plain function
+# BeerDB::handler() and so this inherited implementation will be
+# found. See e.g. "Practical mod_perl"  by Bekman & Cholet for
+# more information <http://modperlbook.org/html/ch25_01.html>
 sub handler : method 
 {
     # See Maypole::Workflow before trying to understand this.