minor changes

This commit is contained in:
Kaleb Murphy 2008-09-26 14:18:36 +00:00
parent 92c87ca9b8
commit ac14d55b18
3 changed files with 9 additions and 9 deletions

View file

@ -256,7 +256,10 @@ sub deleteObject{
$self->saveSurveyJSON();
#The last address in ideas is to a deleted object so that should not be returned.
pop(@{$address});
pop(@{$address});
if(@$address < 1){
$$address[0] = 0;
}
return $self->www_loadSurvey({address => $address, message=>$message});
}
@ -399,8 +402,10 @@ $self->session->errorHandler->error("Loaded JSON");
my $address = $options->{address} ? defined $options : [0];
my $message = $options->{message} ? defined $options : '';
$self->session->errorHandler->error("Getting edit vars");
my $var = $options->{var} ? defined $options : $self->{_data}->getEditVars($address);
$self->session->errorHandler->error("Loaded beginning params");
$self->session->errorHandler->error("Got edit vars");
$self->session->errorHandler->error("Loaded beginning params ".@$address);
my $editHtml;
if($var->{type} eq 'section'){
$var->{id} = join('-',@$address);