[Koha-cvs] CVS: koha/admin z3950servers.pl,1.1.2.2,1.1.2.3

[Steve Tonnesen]

Update of /cvsroot/koha/koha/admin
In directory usw-pr-cvs1:/tmp/cvs-serv4442

Modified Files:
      Tag: rel-1-2
	z3950servers.pl 
Log Message:
Fix to form for setting z39.50 server parameters.  Sanity checks were broken.


Index: z3950servers.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/Attic/z3950servers.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -C2 -r1.1.2.2 -r1.1.2.3
*** z3950servers.pl	25 Oct 2002 18:28:39 -0000	1.1.2.2
--- z3950servers.pl	25 Oct 2002 22:22:21 -0000	1.1.2.3
***************
*** 125,128 ****
--- 125,137 ----
  			_alertString += "- database missing\\n";
  		}
+ 		if (isNaN(f.port.value)) {
+ 			_alertString += "- port must be a number\\n";
+ 		}
+ 		if (isNaN(f.rank.value)) {
+ 			_alertString += "- rank must be a number\\n";
+ 		}
+ 		if (isNaN(f.checked.value) || f.checked.value<0 || f.checked.value>1) {
+ 			_alertString += "- checked must be 0 or 1\\n";
+ 		}
  		if (_alertString.length==0) {
  			document.Aform.submit();
***************
*** 148,160 ****
  		print "<tr><td>Z39.50 Server</td><td><input type=hidden name=searchfield value=\"$searchfield\">$searchfield</td></tr>\n";
  	} else {
! 		print "<tr><td>Z39.50 Server</td><td><input type=text name=searchfield size=5 maxlength=5></td></tr>\n";
  	}
! 	print "<tr><td>Hostname</td><td><input type=text name=host size=40 maxlength=80 value='$data->{'host'}'></td></tr>\n";
! 	print "<tr><td>Port</td><td><input type=text name=port value='$data->{'port'}' onBlur=isNum(this)></td></tr>\n";
  	print "<tr><td>Database</td><td><input type=text name=db value='$data->{'db'}'></td></tr>\n";
  	print "<tr><td>Userid</td><td><input type=text name=userid value='$data->{'userid'}'></td></tr>\n";
  	print "<tr><td>Password</td><td><input type=text name=password value='$data->{'password'}'></td></tr>\n";
! 	print "<tr><td>Checked (searched by default)</td><td><input type=text name=checked value='$data->{'checked'}' onBlur=isNum(this)></td></tr>";
! 	print "<tr><td>Rank (display order)</td><td><input type=text name=rank value='$data->{'rank'}' onBlur=isNum(this)></td></tr>";
  	print "<tr><td>&nbsp;</td><td><INPUT type=button value='OK' onClick='Check(this.form)'></td></tr>";
  	print "</table>";
--- 157,169 ----
  		print "<tr><td>Z39.50 Server</td><td><input type=hidden name=searchfield value=\"$searchfield\">$searchfield</td></tr>\n";
  	} else {
! 		print "<tr><td>Z39.50 Server</td><td><input type=text name=searchfield size=40></td></tr>\n";
  	}
! 	print "<tr><td>Hostname</td><td><input type=text name=host size=30 value='$data->{'host'}'></td></tr>\n";
! 	print "<tr><td>Port</td><td><input type=text name=port size=5 value='$data->{'port'}' onBlur=isNum(this)></td></tr>\n";
  	print "<tr><td>Database</td><td><input type=text name=db value='$data->{'db'}'></td></tr>\n";
  	print "<tr><td>Userid</td><td><input type=text name=userid value='$data->{'userid'}'></td></tr>\n";
  	print "<tr><td>Password</td><td><input type=text name=password value='$data->{'password'}'></td></tr>\n";
! 	print "<tr><td>Checked (searched by default)</td><td><input type=text size=1 name=checked value='$data->{'checked'}' onBlur=isNum(this)></td></tr>";
! 	print "<tr><td>Rank (display order)</td><td><input type=text name=rank size=4 value='$data->{'rank'}' onBlur=isNum(this)></td></tr>";
  	print "<tr><td>&nbsp;</td><td><INPUT type=button value='OK' onClick='Check(this.form)'></td></tr>";
  	print "</table>";