lots o fixes

This commit is contained in:
Matthew Wilson 2006-01-21 19:00:27 +00:00
parent 81a26c6d18
commit fa5439b099
16 changed files with 77 additions and 75 deletions

View file

@ -370,7 +370,8 @@ sub getAssetAdderLinks {
foreach my $class (@{$self->session->config->get($type)}) {
next unless $class;
my %properties = (
className=>$class
className=>$class,
dummy=>1
);
my $newAsset = WebGUI::Asset->newByPropertyHashRef($self->session,\%properties);
next unless $newAsset;
@ -1416,7 +1417,7 @@ Returns "".
sub view {
my $self = shift;
$self->session->http->setRedirect($self->getDefault->getUrl) if ($self->getId eq "PBasset000000000000001");
$self->session->http->setRedirect($self->getDefault($self->session)->getUrl) if ($self->getId eq "PBasset000000000000001");
return $self->getToolbar if ($self->session->var->get("adminOn"));
return undef;
}