[Koha-cvs] CVS: koha installer.pl,1.2.2.52,1.2.2.53

[Steve Tonnesen]

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

Modified Files:
      Tag: rel-1-2
	installer.pl 
Log Message:
Checks the MySQL root password is correct and allows reentry of password.


Index: installer.pl
===================================================================
RCS file: /cvsroot/koha/koha/installer.pl,v
retrieving revision 1.2.2.52
retrieving revision 1.2.2.53
diff -C2 -r1.2.2.52 -r1.2.2.53
*** installer.pl	5 Jul 2002 19:18:16 -0000	1.2.2.52
--- installer.pl	9 Jul 2002 17:58:56 -0000	1.2.2.53
***************
*** 698,706 ****
  |;
  
! print "Enter mysql\'s root users password: ";
! chomp($input = <STDIN>);
! 
! if ($input) {
!   $mysqlpass = $input;
  }
  
--- 698,712 ----
  |;
  
! my $needpassword=1;
! while ($needpassword) {
!     print "Enter mysql\'s root users password: ";
!     chomp($input = <STDIN>);
!     $mysqlpass = $input;
!     my $result=system("$mysqldir/bin/mysqladmin -u$mysqluser -p$mysqlpass proc > /dev/null 2>&1");
!     if ($result) {
! 	print "\n\nInvalid password for the MySql root user.\n\n";
!     } else {
! 	$needpassword=0;
!     }
  }