oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Complete refactor, to handle defaulting to www_view.

Browse source
This commit is contained in:
Colin Kuskie 2010-07-30 16:26:40 -07:00
parent 7a1abd7bc0
commit 1e00e6a93f
1 changed files with 10 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/WebGUI/Asset.pm
View file

@ -571,23 +571,21 @@ URL.
=head3 $fragment
A URL. If this URL is missing, then output from the view method is returned.
If the fragment does not match this Asset's URL, then it returns undef.
Any leftover part of the requested URL.
=cut
sub dispatch {
my ($self, $fragment) = @_;
if (my $func = $self->session->form->param('func')) {
return undef if $fragment && $fragment ne $self->getUrl;
if (my $sub = $self->can('www_'.$func)) {
return $sub->();
}
}
if (! $fragment ) {
return $self->www_view;
}
return undef;
return undef if defined $fragment;
my $state = $self->get('state');
##Only allow interaction with assets in certain states
return if $state ne 'published' && $state ne 'archived' && !$self->session->var->isAdminOn;
my $func = $self->session->form->param('func') || 'view';
my $sub = $self->can('www_'.$func) || $self->can('www_view');
return undef unless $sub;
my $output = $sub->();
return $output;
}