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

SUPER handling for most of Wobject/*.pm. There's a problem with Calendar, though.

Browse source
This commit is contained in:
Colin Kuskie 2010-04-08 17:00:05 -07:00
parent fd736e7f67
commit f56bac9948
18 changed files with 95 additions and 123 deletions
Download patch file Download diff file Expand all files Collapse all files

18
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -417,13 +417,13 @@ an entry is being viewed, bypass caching altogether.
=cut
sub getContentLastModified {
override getContentLastModified => sub {
my $self = shift;
if ($self->currentView eq 'list' || $self->session->form->process('entryId')) {
return time;
}
return $self->SUPER::getContentLastModified;
}
return super();
};
#-------------------------------------------------------------------
@ -993,9 +993,9 @@ Extends the base class to handle form and list mode.
=cut
sub prepareView {
override prepareView => sub {
my $self = shift;
$self->SUPER::prepareView(@_);
super();
my $view = $self->currentView;
if ( $view eq 'form' ) {
$self->prepareViewForm(@_);
@ -1003,7 +1003,7 @@ sub prepareView {
else {
$self->prepareViewList(@_);
}
}
};
#-------------------------------------------------------------------
@ -1153,10 +1153,10 @@ or are part of the groupToViewEntries.
=cut
sub canView {
override canView => sub {
my $self = shift;
return 0
if !$self->SUPER::canView;
if !super();
if ($self->currentView eq 'list') {
return 1
if $self->canEdit;
@ -1165,7 +1165,7 @@ sub canView {
return 0;
}
return 1;
}
};
#-------------------------------------------------------------------