|
From: <ssc...@us...> - 2003-06-25 04:10:58
|
Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv29379
Modified Files:
HTML.pm
Log Message:
fix single-message deletion to track change in parse_form__ behaviour
Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.172
retrieving revision 1.173
diff -C2 -d -r1.172 -r1.173
*** HTML.pm 25 Jun 2003 03:52:38 -0000 1.172
--- HTML.pm 25 Jun 2003 04:10:55 -0000 1.173
***************
*** 2875,2880 ****
$self->history_undo();
! # Handle removal of one or more items from the history page, the remove_array form will contain
! # all the indexes into history_keys that need to be deleted. We pass each file that needs
# deleting into the history_delete_file helper
--- 2875,2881 ----
$self->history_undo();
! # Handle removal of one or more items from the history page, the remove_array form, if defined,
! # will contain all the indexes into history_keys that need to be deleted. If undefined, the remove
! # form element will contain the single index to be deleted. We pass each file that needs
# deleting into the history_delete_file helper
***************
*** 2887,2892 ****
# we are in control of deleting messages
! for my $i ( 0 .. $#{$self->{form_}{remove_array}} ) {
! $self->history_delete_file( $self->{history_keys__}[$self->{form_}{remove_array}[$i] - 1], 0);
}
}
--- 2888,2897 ----
# we are in control of deleting messages
! if ( defined($self->{form_}{remove_array}) ) {
! for my $i ( 0 .. $#{$self->{form_}{remove_array}} ) {
! $self->history_delete_file( $self->{history_keys__}[$self->{form_}{remove_array}[$i] - 1], 0);
! }
! } elsif ( defined($self->{form_}{remove}) ) {
! $self->history_delete_file( $self->{history_keys__}[$self->{form_}{remove} - 1], 0);
}
}
|