[popfile-commit] engine/UI HTML.pm,1.114,1.115

[<ssc...@us...>]

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