Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv1944
Modified Files:
HTML.pm
Log Message:
Fixed submit button search failure in IE (bug 695646)
Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.114
retrieving revision 1.115
diff -C2 -d -r1.114 -r1.115
*** HTML.pm 16 Mar 2003 00:52:33 -0000 1.114
--- HTML.pm 20 Mar 2003 07:46:35 -0000 1.115
***************
*** 2569,2572 ****
--- 2569,2582 ----
$self->{form__}{search} = '' if ( !defined( $self->{form__}{search} ) );
$self->{form__}{filter} = '' if ( !defined( $self->{form__}{filter} ) );
+
+ # Information from submit buttons isn't always preserved if the buttons aren't
+ # pressed. This compares values in some fields and sets the button-values as
+ # though they had been pressed
+
+ # Set setsearch if search changed and setsearch is undefined
+ my $old_search;
+ $self->{form__}{setsearch} = 'on' if ( ( ( !defined($old_search) && defined $self->{form__}{search} ) || ( defined($old_search) && ( $old_search ne $self->{form__}{search} ) ) ) && !defined($self->{form__}{setsearch} ) );
+ $old_search = $self->{form__}{search} if ( defined($self->{form__}{search}) );
+
# If the user is asking for a new sort option then it needs to get
|