- fix: bug in EMS purge
- fix: bug in poll where you can't edit it to have less answers
This commit is contained in:
parent
c1b95c7a62
commit
5167b279f5
5 changed files with 37 additions and 26 deletions
|
|
@ -339,11 +339,13 @@ sub prepareView {
|
|||
sub processPropertiesFromFormPost {
|
||||
my $self = shift;
|
||||
$self->SUPER::processPropertiesFromFormPost;
|
||||
my (@answer, $i, $property);
|
||||
@answer = split("\n",$self->session->form->process("answers"));
|
||||
for ($i=1; $i<=20; $i++) {
|
||||
$property->{'a'.$i} = $answer[($i-1)];
|
||||
}
|
||||
my $property = {};
|
||||
my $answers = $self->session->form->process("answers");
|
||||
$answers =~ s{\r}{}xmsg;
|
||||
my @answer = split("\n",$answers);
|
||||
for (my $i=1; $i<=20; $i++) {
|
||||
$property->{'a'.$i} = $answer[($i-1)] || "";
|
||||
}
|
||||
|
||||
if (WebGUI::Image::Graph->getPluginList($self->session)) {
|
||||
my $graph = WebGUI::Image::Graph->processConfigurationForm($self->session);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue