CatalystX::GlobalContext - Export Catalyst Context
-=head1 VERSION
-
-Version 0.01
-
=cut
-our $VERSION = '0.01';
+our $VERSION = '0.031';
=head1 SYNOPSIS
use CatalystX::GlobalContext ();
- sub auto {
+ sub auto : Private {
my ($self, $c) = @_;
- CatalystX::GlobalContext->set_context($c);
+ CatalystX::GlobalContext->set_context($c);
1;
}
-
+
package Some::Other::Module;
use CatalystX::GlobalContext '$c';
=head1 DESCRIPTION
-This module, in combination with L<Catalyst::Controller::WrapCGI> is for helping
-you run legacy mod_perl code in L<Catalyst>.
+This module, in combination with L<Catalyst::Controller::WrapCGI> or
+L<Catalyst::Controller::CGIBin> is for helping you run legacy mod_perl code in
+L<Catalyst>.
You save a copy of $c somewhere at the beginning of the request cycle, and it is
then accessible through an export where you need it.
-You can then rip out Apache:: type things, and replace them with things based on
-$c.
+You can then rip out C<Apache::> type things, and replace them with things based on
+C<$c>.
-What we really need is a set of Apache:: compatibility classes, but that doesn't
+What we really need is a set of C<Apache::> compatibility classes, but that doesn't
exist yet.
DO NOT USE THIS MODULE IN NEW CODE
weaken $c;
}
-=head1 AUTHOR
+=head1 SEE ALSO
-Rafael Kitover, C<< <rkitover at cpan.org> >>
+L<Catalyst::Controller::CGIBin>, L<Catalyst::Controller::WrapCGI>,
+L<Catalyst>
=head1 BUGS
=back
+=head1 AUTHOR
+
+See L<Catalyst::Controller::WrapCGI/AUTHOR> and
+L<Catalyst::Controller::WrapCGI/CONTRIBUTORS>.
+
=head1 COPYRIGHT & LICENSE
-Copyright (c) 2008 Rafael Kitover
+Copyright (c) 2008-2009 L<Catalyst::Controller::WrapCGI/AUTHOR> and
+L<Catalyst::Controller::WrapCGI/CONTRIBUTORS>.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.