Parent Directory | Revision Log | Patch
revision 5 by dpavlin, Fri Jun 25 16:16:08 2004 UTC | revision 6 by dpavlin, Fri Jun 25 20:51:16 2004 UTC | |
---|---|---|
# | Line 189 sub delete_question { | Line 189 sub delete_question { |
189 | ||
190 | if (defined($self->{'poll'}->{'questions'}->[$nr])) { | if (defined($self->{'poll'}->{'questions'}->[$nr])) { |
191 | delete $self->{'poll'}->{'questions'}->[$nr]; | delete $self->{'poll'}->{'questions'}->[$nr]; |
192 | splice @{$self->{'poll'}->{'qiestions'}},$nr,1; | |
193 | $self->{'poll'}->optimize() || | |
194 | $self->status("Database optimization failed"); | |
195 | $self->status("Question $nr deleted"); | $self->status("Question $nr deleted"); |
196 | $self->editor(); | $self->editor(); |
197 | } else { | } else { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |