[Catalyst-commits] r9107 - in Catalyst-Runtime/5.80/trunk: . lib
marcus at dev.catalyst.perl.org
marcus at dev.catalyst.perl.org
Mon Jan 19 18:19:28 GMT 2009
Author: marcus
Date: 2009-01-19 18:19:28 +0000 (Mon, 19 Jan 2009)
New Revision: 9107
Modified:
Catalyst-Runtime/5.80/trunk/Changes
Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
Log:
Apply doc patch from dhoss
Modified: Catalyst-Runtime/5.80/trunk/Changes
===================================================================
--- Catalyst-Runtime/5.80/trunk/Changes 2009-01-19 17:56:26 UTC (rev 9106)
+++ Catalyst-Runtime/5.80/trunk/Changes 2009-01-19 18:19:28 UTC (rev 9107)
@@ -1,6 +1,7 @@
# This file documents the revision history for Perl extension Catalyst.
5.8000_05
+ - Add docs for finalize hook (dhoss)
- Added ru/ua translations to error page
- Improve the clarity and verbosity of the warning when component
resolution uses regex fallback. (jhannah)
Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm 2009-01-19 17:56:26 UTC (rev 9106)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm 2009-01-19 18:19:28 UTC (rev 9107)
@@ -1057,6 +1057,26 @@
$class->setup_finalize;
}
+
+=head2 $app->setup_finalize
+
+A hook to attach modifiers to.
+Using C< after setup => sub{}; > doesn't work, because of quirky things done for plugin setup.
+Also better than C< setup_finished(); >, as that is a getter method.
+
+ sub setup_finalize {
+
+ my $app = shift;
+
+ ## do stuff, i.e., determine a primary key column for sessions stored in a DB
+
+ $app->next::method(@_);
+
+
+ }
+
+=cut
+
sub setup_finalize {
my ($class) = @_;
$class->setup_finished(1);
More information about the Catalyst-commits
mailing list