Allow WebGUI::Fork's to be built for asset specific methods, and not only those found in WebGUI::Asset's namespace.
This commit is contained in:
parent
6e8801600d
commit
ffcee041be
1 changed files with 11 additions and 2 deletions
|
|
@ -849,7 +849,7 @@ following arguments are required in $args:
|
||||||
|
|
||||||
=head3 method
|
=head3 method
|
||||||
|
|
||||||
The name of the WebGUI::Asset method to call
|
The name of the asset method to call
|
||||||
|
|
||||||
=head3 args
|
=head3 args
|
||||||
|
|
||||||
|
|
@ -867,13 +867,22 @@ An key in Asset's i18n hash for the title of the rendered console page
|
||||||
|
|
||||||
The full url to redirect to after the fork has finished.
|
The full url to redirect to after the fork has finished.
|
||||||
|
|
||||||
|
=head3 className
|
||||||
|
|
||||||
|
The class to call C<method> in, as in
|
||||||
|
|
||||||
|
$className->$method
|
||||||
|
|
||||||
|
defaults to the current Asset's classname if left blank.
|
||||||
|
|
||||||
=cut
|
=cut
|
||||||
|
|
||||||
sub forkWithStatusPage {
|
sub forkWithStatusPage {
|
||||||
my ( $self, $args ) = @_;
|
my ( $self, $args ) = @_;
|
||||||
my $session = $self->session;
|
my $session = $self->session;
|
||||||
|
|
||||||
my $process = WebGUI::Fork->start( $session, 'WebGUI::Asset', $args->{method}, $args->{args} );
|
my $className = $args->{className} || $self->get('className');
|
||||||
|
my $process = WebGUI::Fork->start( $session, $className, $args->{method}, $args->{args} );
|
||||||
|
|
||||||
if ( my $groupId = $args->{groupId} ) {
|
if ( my $groupId = $args->{groupId} ) {
|
||||||
$process->setGroup($groupId);
|
$process->setGroup($groupId);
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue