Moose overriding for indexContent.

This commit is contained in:
Colin Kuskie 2010-04-07 15:07:20 -07:00
parent 953df9d6a9
commit c786395eb4
13 changed files with 65 additions and 52 deletions

View file

@ -651,11 +651,12 @@ Making private. See WebGUI::Asset::indexContent() for additonal details.
=cut
sub indexContent {
around indexContent => sub {
my $orig = shift;
my $self = shift;
my $indexer = $self->SUPER::indexContent;
my $indexer = $self->$orig(@_);
$indexer->setIsPublic(0);
}
};
#-------------------------------------------------------------------