[Koha-cvs] CVS: koha/misc Install.pm,1.70,1.71

Ambrose Li acli at users.sourceforge.net
Mon Feb 9 23:36:35 CET 2004


Update of /cvsroot/koha/koha/misc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4855/misc

Modified Files:
	Install.pm 
Log Message:
Fix of bug 711, "No message named WhereisMySQL in Install.pm".

Added defined() check for
"Use of uninitialized value in -e at Install.pm line 2085, <STDIN> line 32."


Index: Install.pm
===================================================================
RCS file: /cvsroot/koha/koha/misc/Install.pm,v
retrieving revision 1.70
retrieving revision 1.71
diff -C2 -r1.70 -r1.71
*** Install.pm	22 Dec 2003 19:16:58 -0000	1.70
--- Install.pm	9 Feb 2004 22:36:32 -0000	1.71
***************
*** 998,1002 ****
      if (!$mysqldir){
  	for (;;) {
! 	    $mysqldir = showmessage(getmessage('WhereisMySQL'),'free');
  	    last if -f "$mysqldir/bin/mysqladmin";
  	}
--- 998,1002 ----
      if (!$mysqldir){
  	for (;;) {
! 	    $mysqldir = showmessage(getmessage('WhereIsMySQL'),'free');
  	    last if -f "$mysqldir/bin/mysqladmin";
  	}
***************
*** 2080,2087 ****
  
  sub restoremycnf {
! 	if (-e $mycnf) {
  		unlink($mycnf);
  	}
! 	if (-e $mytmpcnf) {
  		rename $mytmpcnf,$mycnf;
  	}
--- 2080,2087 ----
  
  sub restoremycnf {
! 	if (defined $mycnf && -e $mycnf) {
  		unlink($mycnf);
  	}
! 	if (defined $mytmpcnf && -e $mytmpcnf) {
  		rename $mytmpcnf,$mycnf;
  	}





More information about the Koha-cvs mailing list